raw-angle from scale-rotated-ellipse

Time bar (total: 10.8s)

start0.0ms (0.0%)

Memory
0.2MiB live, 0.2MiB allocated; 0ms collecting garbage

analyze718.0ms (6.6%)

Memory
-6.9MiB live, 221.7MiB allocated; 7ms collecting garbage
Algorithm
search
Search
ProbabilityValidUnknownPreconditionInfiniteDomainCan'tIter
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
6.3%6.2%93.5%0.2%0.0%0.0%0.0%6
6.5%6.2%90.4%0.2%0.0%3.1%0.0%7
6.5%6.2%90.4%0.2%0.0%3.1%0.0%8
6.5%6.2%90.4%0.2%0.0%3.1%0.0%9
7.7%7.4%88.7%0.2%0.0%3.7%0.0%10
11.1%10.6%84.8%0.2%0.0%4.4%0.0%11
12.6%11.8%82.1%0.2%0.0%5.8%0.0%12
Compiler

Compiled 171 to 45 computations (73.7% saved)

sample4.8s (44.6%)

Memory
34.6MiB live, 1 216.1MiB allocated; 280ms collecting garbage
Samples
1.7s2 789×1valid
1.0s1 174×2valid
912.0ms4 160×0valid
189.0ms133×3valid
21.0ms90×0invalid
Precisions
Click to see histograms. Total time spent on operations: 3.3s
ival-cosu: 609.0ms (18.2% of total, 43.1 MiB)
ival-pow2: 534.0ms (16.0% of total, 144.9 MiB)
ival-sinu: 532.0ms (15.9% of total, 47.0 MiB)
ival-div!: 447.0ms (13.4% of total, 60.3 MiB)
ival-mult!: 432.0ms (12.9% of total, 76.9 MiB)
adjust: 380.0ms (11.4% of total, 56.1 MiB)
ival-sub!: 125.0ms (3.7% of total, 29.8 MiB)
ival-sqrt: 110.0ms (3.3% of total, 20.9 MiB)
ival-add!: 91.0ms (2.7% of total, 22.4 MiB)
ival-atan: 81.0ms (2.4% of total, 16.2 MiB)
ival-pi: 0.0ms (0.0% of total, 0.0 MiB)
Bogosity

preprocess45.0ms (0.4%)

Memory
-3.4MiB live, 14.1MiB allocated; 1ms collecting garbage
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
04523593
121853573
Stop Event
node-limit
Alt Table
Click to see full alt table
StatusAccuracyProgram
11.6%
(*.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)))
Symmetry

(abs a)

(abs b)

Compiler

Compiled 338 to 90 computations (73.4% saved)

series279.0ms (2.6%)

Memory
-5.2MiB live, 187.0MiB allocated; 20ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
02474102099
Stop Event
iter-limit
Counts
45 → 380
Calls
Call 1
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 180 #s(literal 0 binary64))
#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)))))))))))))
Calls

15 calls:

TimeVariablePoint
14.0ms
angle
0
10.0ms
angle
inf
10.0ms
a
0
9.0ms
a
inf
8.0ms
b
0

rewrite257.0ms (2.4%)

Memory
12.7MiB live, 158.6MiB allocated; 14ms collecting garbage
Iterations

Useful iterations: 2 (0.0ms)

IterNodesCost
0451503
0831503
14071503
220201398
050781398
Stop Event
iter-limit
node-limit
iter-limit
Counts
45 → 922
Calls
Call 1
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))))
#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 (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 #s(literal 1/2 binary64) (*.f64 #s(literal 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 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)))
(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)
(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)
(*.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 (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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.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 (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)))
(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)
(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)))
(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))))))
(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)))))
(+.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)))))
(*.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 (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 (/.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))))) (*.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 #s(literal 1/2 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 (*.f64 (*.f64 (+.f64 b a) (-.f64 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))))

eval154.0ms (1.4%)

Memory
5.7MiB live, 126.7MiB allocated; 19ms collecting garbage
Compiler

Compiled 308 769 to 15 256 computations (95.1% saved)

prune34.0ms (0.3%)

Memory
0.6MiB live, 31.9MiB allocated; 2ms collecting garbage
Pruning

28 alts after pruning (27 fresh and 1 done)

PrunedKeptTotal
New1 248271 275
Fresh000
Picked011
Done000
Total1 248281 276
Accuracy
51.7%
Counts
1 276 → 28
Alt Table
Click to see full alt table
StatusAccuracyProgram
8.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 (*.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 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(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)) #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.6%
(*.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)))
8.8%
(*.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/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)))))))))))) (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/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)))))))))))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
11.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 #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)))
7.6%
(*.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 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(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 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)))))) (PI.f64)))
13.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 #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(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 #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(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.0%
(*.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)))
7.8%
(*.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)))
6.7%
(*.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))) (/.f64 (*.f64 (*.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))))) (PI.f64)))
7.6%
(*.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))) 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))))) (PI.f64)))
7.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))) 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)))) (PI.f64)))
12.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) (/.f64 #s(literal 1 binary64) y-scale))) (PI.f64)))
9.4%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.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))))) 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))) (PI.f64)))
2.1%
(*.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)))
7.7%
(*.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)))
9.8%
(*.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 (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))))))) (/.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.3%
(*.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)))
12.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 #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)))
11.7%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.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)))))) (*.f64 x-scale y-scale))) (PI.f64)))
4.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 (*.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))) (PI.f64)))
1.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 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)))))))))))) (PI.f64)))
8.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 (*.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)))
5.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 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)))
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 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)))
3.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 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)))
20.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 (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)))
20.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 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)))
17.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)))
Compiler

Compiled 9 429 to 911 computations (90.3% saved)

series747.0ms (6.9%)

Memory
17.4MiB live, 499.5MiB allocated; 61ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
07992304514
Stop Event
iter-limit
Counts
137 → 1 208
Calls
Call 1
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))
(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))
#s(literal 1/180 binary64)
(*.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))))
(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 (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))))
(pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))
(*.f64 (pow.f64 b #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 y-scale #s(literal 2 binary64))
(/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(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 (cos.f64 (*.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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))
(*.f64 (pow.f64 b #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 x-scale #s(literal 2 binary64))
#s(literal 1/2 binary64)
#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))))
(*.f64 (cos.f64 (*.f64 #s(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/180 binary64) angle)
(/.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 (/.f64 (pow.f64 b #s(literal 2 binary64)) (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))
(*.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)))))
(sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(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)))))
#s(literal 90 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 (*.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))))))))
(pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 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 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 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 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)))))))))
(sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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 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 (*.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))))))
(*.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 #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))))))))
(pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 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 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.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 (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.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 (pow.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 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))
(*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))
(cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))))
(*.f64 b b)
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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/2 binary64) (*.f64 #s(literal 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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #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) 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 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(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) (*.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 (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(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))
(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))) 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)) #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))) 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)) #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 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(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)) #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 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(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)) #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 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(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)) #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 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(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)) #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 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(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)) #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 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(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)) #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)))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow 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)))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow 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)))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow 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)))))))))
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow 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 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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))
(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)))
(/.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 (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.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)))
Outputs
#s(approx 180 #s(literal 0 binary64))
#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 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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))) (pow.f64 y-scale #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 (/ (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 (* (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 (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 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (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 (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow 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 (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 (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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 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))))) (pow.f64 y-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 (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (+.f64 (*.f64 (pow.f64 a #s(literal 2 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 y-scale #s(literal 4 binary64)))) (/.f64 (*.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))) (pow.f64 y-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 (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 (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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 (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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 (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 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 (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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 (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 (pow.f64 (cos.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 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)))) (*.f64 (pow.f64 y-scale #s(literal 8 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)))))) (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)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 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 (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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 (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 (/.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 4 binary64))) (/.f64 (*.f64 (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)))) (*.f64 (pow.f64 y-scale #s(literal 8 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 y-scale #s(literal 4 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 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.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 4 binary64))) (/.f64 (*.f64 (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)))) (*.f64 (pow.f64 y-scale #s(literal 8 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))))) (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)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 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 (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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 2 binary64)) (pow.f64 (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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 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)))) (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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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 (pow.f64 (cos.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 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)))) (*.f64 (pow.f64 y-scale #s(literal 8 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)))))) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 y-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)))) (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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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/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 (/.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 4 binary64))) (/.f64 (*.f64 (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)))) (*.f64 (pow.f64 y-scale #s(literal 8 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 y-scale #s(literal 4 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 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.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 4 binary64))) (/.f64 (*.f64 (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)))) (*.f64 (pow.f64 y-scale #s(literal 8 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))))) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 y-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)))) (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 (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (*.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))) (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 (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+.f64 (*.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))) (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 a #s(literal 2 binary64)) (*.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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 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 (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+.f64 (*.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))) (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 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 (pow.f64 (cos.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 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)))) (*.f64 (pow.f64 y-scale #s(literal 8 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))))))) (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 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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 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 (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+.f64 (*.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))) (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 a #s(literal 2 binary64)) (+.f64 (*.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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 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 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.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 4 binary64))) (/.f64 (*.f64 (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)))) (*.f64 (pow.f64 y-scale #s(literal 8 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)))))) (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 (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 (/.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 4 binary64))) (/.f64 (*.f64 (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)))) (*.f64 (pow.f64 y-scale #s(literal 8 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 y-scale #s(literal 3 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)))))))))))
#s(approx (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (*.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))) (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 (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (+.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))) (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 a #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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 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 (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (+.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))) (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 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 (pow.f64 (cos.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 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)))) (*.f64 (pow.f64 y-scale #s(literal 8 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)))))))) (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 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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 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 (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (+.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))) (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 a #s(literal 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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 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 (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 (cos.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 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)))) (*.f64 (pow.f64 y-scale #s(literal 8 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))))))) (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 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-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 (cos.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 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)))) (*.f64 (pow.f64 y-scale #s(literal 8 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 y-scale #s(literal 3 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)))))))))))
#s(approx (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))) (/.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))) (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)) (*.f64 (cos.f64 (*.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 (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (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 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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 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 (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))) (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 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 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)) (*.f64 (cos.f64 (*.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 (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (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 x-scale (*.f64 y-scale (-.f64 (/.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 4 binary64))) (/.f64 (*.f64 (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)))) (*.f64 (pow.f64 y-scale #s(literal 8 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 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 (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 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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 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 (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))) (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 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 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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 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 (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))) (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 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 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)) (*.f64 (cos.f64 (*.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 (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (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 x-scale (*.f64 y-scale (-.f64 (/.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 4 binary64))) (/.f64 (*.f64 (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)))) (*.f64 (pow.f64 y-scale #s(literal 8 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 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 (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 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.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 (pow.f64 (cos.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 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)))) (*.f64 (pow.f64 y-scale #s(literal 8 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 y-scale #s(literal 3 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 #s(literal -1 binary64) (/.f64 (-.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 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (*.f64 (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)))) (*.f64 (pow.f64 y-scale #s(literal 8 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 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 (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 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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 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 (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))) (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 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 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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 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 (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))) (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 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 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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 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 (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))) (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 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 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)) (*.f64 (cos.f64 (*.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 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.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))) (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)) (*.f64 (cos.f64 (*.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 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (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 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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 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 (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))) (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 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))) (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)) (*.f64 (cos.f64 (*.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 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (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 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))) (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)) (*.f64 (cos.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 (pow.f64 (cos.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 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)))) (*.f64 (pow.f64 y-scale #s(literal 8 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 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 (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 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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 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 (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))) (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 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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 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 (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))) (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 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 (* 1/2 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (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 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))) (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)) (*.f64 (cos.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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 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 (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))) (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 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/2 binary64) (/.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 (pow.f64 (cos.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 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)))) (*.f64 (pow.f64 y-scale #s(literal 8 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 y-scale #s(literal 3 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 #s(literal -1 binary64) (/.f64 (-.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 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (*.f64 (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)))) (*.f64 (pow.f64 y-scale #s(literal 8 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 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 (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 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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 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 (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))) (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 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 (pow.f64 (cos.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 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)))) (*.f64 (pow.f64 y-scale #s(literal 8 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 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 (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 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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 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 (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))) (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 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 (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 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (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 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))))))
#s(approx (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))) (-.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)) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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))))))) (*.f64 (pow.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))))))
#s(approx (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 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 (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)))))) (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 (*.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 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))))))
#s(approx (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 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/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)))))))) (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 (*.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 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))))))
#s(approx (/ (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (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 (*.f64 (pow.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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (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 (*.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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (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 (*.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 (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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (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 (*.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 (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 #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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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)))) (-.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 (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* 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 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* 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 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* 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 (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) 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))))))) y-scale))
#s(approx (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) 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)))) y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) 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))))))) y-scale)))
#s(approx (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* 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 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* 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 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* 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 (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale)) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))
#s(approx (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)))
#s(approx (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (*.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)))))))))
#s(approx (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (+.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 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))))))))))
#s(approx (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (-.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)))
#s(approx (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (-.f64 (+.f64 (*.f64 (pow.f64 a #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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale))) (*.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)))
#s(approx (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) (/.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale)))
#s(approx (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) (-.f64 (+.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 (*.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(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 y-scale #s(literal 2 binary64)))))
#s(approx (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (/.f64 (pow.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (/.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (/.f64 (pow.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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 (pow.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (/.f64 (pow.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (/.f64 (pow.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (sqrt (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (sqrt (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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))))) (/.f64 (pow.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (sqrt (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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))))) (/.f64 (pow.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-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 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 (-.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))
#s(approx (sqrt (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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))))) (/.f64 (pow.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #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 (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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))))) (/.f64 (pow.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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)) (sqrt (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 (-.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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)) (sqrt (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 #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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 (-.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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)) (sqrt (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 #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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 (-.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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)) (sqrt (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 (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 (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 (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))))) (/.f64 (pow.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 (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))))) (/.f64 (pow.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 (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 (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 (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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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)))) (*.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))))) (/.f64 (pow.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 (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))))) (/.f64 (pow.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 (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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 (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))))) (/.f64 (pow.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 (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 (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 (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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 (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))))) (/.f64 (pow.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 (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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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)))) (*.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))))) (/.f64 (pow.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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)))) (*.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))))) (/.f64 (pow.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 (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))))) (/.f64 (pow.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 (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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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)))) (*.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))))) (/.f64 (pow.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 (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))))) (/.f64 (pow.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 (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 (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) 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))))) (/.f64 (pow.f64 (-.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 (*.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))))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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)))))))) (*.f64 (cos.f64 (*.f64 #s(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 (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) 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))))) (/.f64 (pow.f64 (-.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 (*.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))))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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)))))))) (*.f64 (cos.f64 (*.f64 #s(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 (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) 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))))) (/.f64 (pow.f64 (-.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 (*.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))))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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)))))))) (*.f64 (cos.f64 (*.f64 #s(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 (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 (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 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 (* (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 (- (/ (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 (* (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 (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 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (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)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow 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 (+ (* (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 (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #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 y-scale #s(literal 4 binary64))))))
#s(approx (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #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 y-scale #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 (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (/.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 4 binary64))))))
#s(approx (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (sqrt.f64 (/.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 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)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.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 4 binary64))))))))))
#s(approx (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (sqrt.f64 (/.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 4 binary64)))) (+.f64 (*.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 (*.f64 (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)))) (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.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 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (/.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 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)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.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 4 binary64)))))))))))
#s(approx (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (sqrt.f64 (/.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 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 (*.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 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)))) (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.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 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.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 4 binary64)))) #s(literal 3 binary64)))))) (+.f64 (*.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 (*.f64 (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)))) (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.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 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (/.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 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)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.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 4 binary64))))))))))))
#s(approx (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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))) (sqrt.f64 (/.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 4 binary64)))))))
#s(approx (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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 (pow.f64 (cos.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)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 4 binary64)) (sqrt.f64 (/.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 4 binary64)))))))))))
#s(approx (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (*.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 (*.f64 (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)))) (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.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 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (/.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 4 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 (pow.f64 (cos.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)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 4 binary64)) (sqrt.f64 (/.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 4 binary64)))))))))))
#s(approx (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 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)))) (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.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 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.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 4 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 (pow.f64 (cos.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 (*.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 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)))) (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.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 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (/.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 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)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.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 4 binary64))))))))))))
#s(approx (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.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))) (sqrt.f64 (/.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 4 binary64))))))))
#s(approx (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.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))) (sqrt.f64 (/.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 4 binary64)))))) (/.f64 (*.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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 4 binary64)) (sqrt.f64 (/.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 4 binary64)))))))) (pow.f64 a #s(literal 2 binary64))))))
#s(approx (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.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 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)))) (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.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 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (/.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 4 binary64))))))) (+.f64 (*.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))) (sqrt.f64 (/.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 4 binary64)))))) (/.f64 (*.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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 4 binary64)) (sqrt.f64 (/.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 4 binary64)))))))) (pow.f64 a #s(literal 2 binary64)))))))
#s(approx (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.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 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)))) (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.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 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (/.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 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 (*.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 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)))) (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.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 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (/.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 4 binary64)))) #s(literal 3 binary64)))))) (+.f64 (*.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))) (sqrt.f64 (/.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 4 binary64)))))) (/.f64 (*.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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 4 binary64)) (sqrt.f64 (/.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 4 binary64)))))))) (pow.f64 a #s(literal 2 binary64))))))))
#s(approx (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (*.f64 (pow.f64 a #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))) (sqrt.f64 (/.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 4 binary64)))))))))
#s(approx (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (*.f64 (pow.f64 a #s(literal 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))) (sqrt.f64 (/.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 4 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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 4 binary64)) (sqrt.f64 (/.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 4 binary64))))))))) (pow.f64 a #s(literal 2 binary64))))))
#s(approx (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (*.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 (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 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)))) (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.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 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (/.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 4 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))) (sqrt.f64 (/.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 4 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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 4 binary64)) (sqrt.f64 (/.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 4 binary64))))))))) (pow.f64 a #s(literal 2 binary64)))))))
#s(approx (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (*.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 (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 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)))) (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.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 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (/.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 4 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-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 (*.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 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)))) (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.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 4 binary64)))) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (/.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 4 binary64)))) #s(literal 3 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))) (sqrt.f64 (/.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 4 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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 4 binary64)) (sqrt.f64 (/.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 4 binary64))))))))) (pow.f64 a #s(literal 2 binary64))))))))
#s(approx (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))) (*.f64 #s(literal -1 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))) (sqrt.f64 (/.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 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 (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (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 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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 4 binary64)) (sqrt.f64 (/.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 4 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 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))) (sqrt.f64 (/.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 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 (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))) (sqrt.f64 (/.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 4 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 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (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 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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 4 binary64)) (sqrt.f64 (/.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 4 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 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))) (sqrt.f64 (/.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 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 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 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)))) (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.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 4 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)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (/.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 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 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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 4 binary64)) (sqrt.f64 (/.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 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 (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))) (sqrt.f64 (/.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 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 4 binary64)))) (/.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))) (sqrt.f64 (/.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 4 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 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (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 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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 4 binary64)) (sqrt.f64 (/.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 4 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 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))) (sqrt.f64 (/.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 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 (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 (/.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 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)))) (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.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 4 binary64)))) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (/.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 4 binary64)))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.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 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)))) (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.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 4 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)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (/.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 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 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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 4 binary64)) (sqrt.f64 (/.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 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 (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))) (sqrt.f64 (/.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 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 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 x-scale (*.f64 y-scale (-.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 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)))) (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.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 4 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 (pow.f64 (cos.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 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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 4 binary64)) (sqrt.f64 (/.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 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 (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))) (sqrt.f64 (/.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 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 6 binary64)))) (/.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))) (sqrt.f64 (/.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 4 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 (* 1/2 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.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))) (sqrt.f64 (/.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 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 (* 1/2 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (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 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))) (sqrt.f64 (/.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 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 (*.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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 4 binary64)) (sqrt.f64 (/.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 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 (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))) (sqrt.f64 (/.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 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 (* 1/2 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (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 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))) (sqrt.f64 (/.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 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 (*.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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 4 binary64)) (sqrt.f64 (/.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 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 (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))) (sqrt.f64 (/.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 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 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.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 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)))) (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.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 4 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 (pow.f64 (cos.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 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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 4 binary64)) (sqrt.f64 (/.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 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 (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))) (sqrt.f64 (/.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 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 4 binary64)))))))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (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 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))) (sqrt.f64 (/.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 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 (*.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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 4 binary64)) (sqrt.f64 (/.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 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 (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))) (sqrt.f64 (/.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 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 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.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)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (*.f64 (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)))) (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.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 4 binary64)))) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (/.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 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 (*.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 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)))) (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.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 4 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 (pow.f64 (cos.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 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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 4 binary64)) (sqrt.f64 (/.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 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 (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))) (sqrt.f64 (/.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 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 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 (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 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)))) (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.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 4 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 (pow.f64 (cos.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 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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 4 binary64)) (sqrt.f64 (/.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 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 (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))) (sqrt.f64 (/.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 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 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)) (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 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (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 (pow.f64 (cos.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))))))
#s(approx (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (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 (+.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))) (+.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 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (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 (+.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 (*.f64 (pow.f64 b #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)))) (+.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 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (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 (+.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 (*.f64 (pow.f64 b #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)))) (+.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 (/ (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (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 (pow.f64 (cos.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 y-scale #s(literal 2 binary64))))
#s(approx (/ (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (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 (/.f64 (*.f64 (pow.f64 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 (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 (/ (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (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 (*.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 (*.f64 (pow.f64 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 (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 (/ (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (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 (*.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 #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 (*.f64 (pow.f64 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 (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 (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* 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 (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) 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))))))) y-scale))
#s(approx (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) 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)))) y-scale)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) 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))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) y-scale))))))
#s(approx (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* 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 (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale)) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))
#s(approx (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 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)) y-scale)) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale))))
#s(approx (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (*.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)))))))))
#s(approx (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (*.f64 (pow.f64 a #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 (*.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)))))))) (pow.f64 a #s(literal 2 binary64))))))
#s(approx (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (*.f64 (pow.f64 a #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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale))))
#s(approx (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (*.f64 (pow.f64 a #s(literal 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 (*.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)))))))) (pow.f64 a #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 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)) y-scale)) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)))))
#s(approx (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) (/.f64 (*.f64 (pow.f64 a #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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale)))
#s(approx (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.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)) (pow.f64 x-scale #s(literal 2 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)))))) (pow.f64 x-scale #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))))))) (*.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/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (/.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (/.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))
#s(approx (sqrt (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))
#s(approx (sqrt (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (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 (*.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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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))))) (/.f64 (pow.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))))
#s(approx (sqrt (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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))))) (/.f64 (pow.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #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 (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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)) (sqrt (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (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 (*.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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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))))) (/.f64 (pow.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-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))))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 (-.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (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 (*.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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (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 (*.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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (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 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 (-.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 (cos.f64 (*.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 (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 (cos.f64 (*.f64 #s(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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 (cos.f64 (*.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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 (cos.f64 (*.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 (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 (cos.f64 (*.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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 (cos.f64 (*.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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 (cos.f64 (*.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))))) (/.f64 (pow.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 (-.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 (cos.f64 (*.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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 (cos.f64 (*.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 (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 (cos.f64 (*.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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 (cos.f64 (*.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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 (cos.f64 (*.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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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)))) (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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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))))) (/.f64 (pow.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 (-.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 (cos.f64 (*.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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 (cos.f64 (*.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))))) (/.f64 (pow.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 (-.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 (cos.f64 (*.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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 (cos.f64 (*.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 (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 (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) 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))))) (/.f64 (pow.f64 (-.f64 (*.f64 y-scale (-.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 (pow.f64 x-scale #s(literal 2 binary64)) (+.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)))))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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)))))))) (*.f64 (cos.f64 (*.f64 #s(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 (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) 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))))) (/.f64 (pow.f64 (-.f64 (*.f64 y-scale (-.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 (pow.f64 x-scale #s(literal 2 binary64)) (+.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)))))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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)))))))) (*.f64 (cos.f64 (*.f64 #s(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 (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) 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))))) (/.f64 (pow.f64 (-.f64 (*.f64 y-scale (-.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 (pow.f64 x-scale #s(literal 2 binary64)) (+.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)))))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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)))))))) (*.f64 (cos.f64 (*.f64 #s(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 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 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 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 (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow 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 (+ (* (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 (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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 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))))) (pow.f64 y-scale #s(literal 4 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))) (pow.f64 y-scale #s(literal 4 binary64)))))
#s(approx (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (+.f64 (*.f64 (pow.f64 b #s(literal 2 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 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 4 binary64))) (pow.f64 y-scale #s(literal 4 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))) (pow.f64 y-scale #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 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (sqrt.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 y-scale #s(literal 4 binary64)))))
#s(approx (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (+.f64 (sqrt.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 y-scale #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))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.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 y-scale #s(literal 4 binary64))))))))
#s(approx (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (+.f64 (sqrt.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 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 b #s(literal 2 binary64)) (-.f64 (/.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 4 binary64))) (/.f64 (*.f64 (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)))) (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.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 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (sqrt.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 y-scale #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 4 binary64)) (sqrt.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 y-scale #s(literal 4 binary64))))))))))
#s(approx (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (+.f64 (sqrt.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 y-scale #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 (/.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 4 binary64))) (/.f64 (*.f64 (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)))) (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.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 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.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 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.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 4 binary64))) (/.f64 (*.f64 (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)))) (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.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 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.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 y-scale #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 4 binary64)) (sqrt.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 y-scale #s(literal 4 binary64))))))))))
#s(approx (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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))) (sqrt.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 y-scale #s(literal 4 binary64))))))
#s(approx (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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 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 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 4 binary64)) (sqrt.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 y-scale #s(literal 4 binary64)))))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (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 (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 4 binary64))))))
#s(approx (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.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 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (*.f64 (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)))) (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.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 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (sqrt.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 y-scale #s(literal 4 binary64)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(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)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 4 binary64)) (sqrt.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 y-scale #s(literal 4 binary64)))))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (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 (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 4 binary64))))))
#s(approx (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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 2 binary64)) (-.f64 (+.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 (/.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 4 binary64))) (/.f64 (*.f64 (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)))) (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.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 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.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 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.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 4 binary64))) (/.f64 (*.f64 (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)))) (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.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 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.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 y-scale #s(literal 4 binary64)))))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(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)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 4 binary64)) (sqrt.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 y-scale #s(literal 4 binary64)))))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (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 (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 4 binary64))))))
#s(approx (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (*.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))) (sqrt.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 y-scale #s(literal 4 binary64)))))))
#s(approx (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+.f64 (*.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))) (sqrt.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 y-scale #s(literal 4 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 4 binary64)) (sqrt.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 y-scale #s(literal 4 binary64)))))))))))
#s(approx (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+.f64 (*.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))) (sqrt.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 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 b #s(literal 2 binary64)) (*.f64 y-scale (-.f64 (/.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 4 binary64))) (/.f64 (*.f64 (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)))) (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.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 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (sqrt.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 y-scale #s(literal 4 binary64)))))) (*.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 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 4 binary64)) (sqrt.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 y-scale #s(literal 4 binary64))))))))))))
#s(approx (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+.f64 (*.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))) (sqrt.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 y-scale #s(literal 4 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.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 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 4 binary64)) (sqrt.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 y-scale #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.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 4 binary64))) (/.f64 (*.f64 (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)))) (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.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 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (sqrt.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 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 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)))) (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.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 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (pow.f64 (sqrt.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 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))))))))
#s(approx (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (*.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))) (sqrt.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 y-scale #s(literal 4 binary64))))))))
#s(approx (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (+.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))) (sqrt.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 y-scale #s(literal 4 binary64))))))) (*.f64 (pow.f64 b #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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 4 binary64)) (sqrt.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 y-scale #s(literal 4 binary64))))))))))))
#s(approx (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (+.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))) (sqrt.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 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 b #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 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (*.f64 (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)))) (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.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 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (sqrt.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 y-scale #s(literal 4 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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 4 binary64)) (sqrt.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 y-scale #s(literal 4 binary64)))))))))))))
#s(approx (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (+.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))) (sqrt.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 y-scale #s(literal 4 binary64))))))) (*.f64 (pow.f64 b #s(literal 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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 4 binary64)) (sqrt.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 y-scale #s(literal 4 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 (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 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)))) (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.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 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (sqrt.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 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 x-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 (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 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)))) (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.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 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))))) (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (pow.f64 (sqrt.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 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))))))))
#s(approx (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))) (*.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))) (sqrt.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 y-scale #s(literal 4 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 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))) (+.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))) (sqrt.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 y-scale #s(literal 4 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 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 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 4 binary64)) (sqrt.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 y-scale #s(literal 4 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))) (sqrt.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 y-scale #s(literal 4 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 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))) (+.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))) (sqrt.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 y-scale #s(literal 4 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 (*.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 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 4 binary64)) (sqrt.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 y-scale #s(literal 4 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 x-scale (*.f64 y-scale (-.f64 (/.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 4 binary64))) (/.f64 (*.f64 (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)))) (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.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 y-scale #s(literal 4 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 (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 4 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 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 4 binary64)) (sqrt.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 y-scale #s(literal 4 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))) (sqrt.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 y-scale #s(literal 4 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))) (sqrt.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 y-scale #s(literal 4 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 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))) (+.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))) (sqrt.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 y-scale #s(literal 4 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 (*.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 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 4 binary64)) (sqrt.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 y-scale #s(literal 4 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 (*.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 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (*.f64 (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)))) (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.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 y-scale #s(literal 4 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 (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 4 binary64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.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 (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 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)))) (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.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 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (pow.f64 (sqrt.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 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 (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 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)))) (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.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 y-scale #s(literal 4 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 (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 4 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 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 4 binary64)) (sqrt.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 y-scale #s(literal 4 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))) (sqrt.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 y-scale #s(literal 4 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 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 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 4 binary64)) (sqrt.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 y-scale #s(literal 4 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))) (sqrt.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 y-scale #s(literal 4 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))) (sqrt.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 y-scale #s(literal 4 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 (* 1/2 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.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))) (sqrt.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 y-scale #s(literal 4 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 (* 1/2 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (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 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))) (sqrt.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 y-scale #s(literal 4 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 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 4 binary64)) (sqrt.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 y-scale #s(literal 4 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))) (sqrt.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 y-scale #s(literal 4 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 (* 1/2 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (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 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))) (sqrt.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 y-scale #s(literal 4 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 (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 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)))) (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.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 y-scale #s(literal 4 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 (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 4 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 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 4 binary64)) (sqrt.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 y-scale #s(literal 4 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))) (sqrt.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 y-scale #s(literal 4 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 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 4 binary64)) (sqrt.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 y-scale #s(literal 4 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))) (sqrt.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 y-scale #s(literal 4 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 (* 1/2 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (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 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))) (sqrt.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 y-scale #s(literal 4 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 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 4 binary64)) (sqrt.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 y-scale #s(literal 4 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))) (sqrt.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 y-scale #s(literal 4 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/2 binary64) (/.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 (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 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)))) (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.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 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (pow.f64 (sqrt.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 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 (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 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)))) (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.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 y-scale #s(literal 4 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 (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 4 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 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 4 binary64)) (sqrt.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 y-scale #s(literal 4 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))) (sqrt.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 y-scale #s(literal 4 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 (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 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)))) (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.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 y-scale #s(literal 4 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 (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 4 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 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 4 binary64)) (sqrt.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 y-scale #s(literal 4 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))) (sqrt.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 y-scale #s(literal 4 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 (+ (* (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 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (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)) (pow.f64 (cos.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 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 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))) (*.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 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 (*.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)))))))) (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 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 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))) (*.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 (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)))))) (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 (*.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)))))))) (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 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 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))) (*.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 (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)))))))) (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 (*.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)))))))) (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 (/ (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.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))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (/ (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (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 (*.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 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (/ (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (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 (*.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 (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 (pow.f64 (sin.f64 (*.f64 #s(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)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (/ (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (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 (*.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 (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 #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 (pow.f64 (sin.f64 (*.f64 #s(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)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.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))))))) y-scale)))
#s(approx (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (-.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)))
#s(approx (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (-.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 (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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)))
#s(approx (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) (/.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale)))
#s(approx (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) (-.f64 (+.f64 (*.f64 (pow.f64 b #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 #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 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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(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 (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (/.f64 (pow.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (/.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (/.f64 (pow.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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 (pow.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (/.f64 (pow.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (/.f64 (pow.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (sqrt (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (sqrt (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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))))) (/.f64 (pow.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (sqrt (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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))))) (/.f64 (pow.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))
#s(approx (sqrt (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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))))) (/.f64 (pow.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #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 (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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))))) (/.f64 (pow.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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)) (sqrt (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 (-.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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)) (sqrt (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 #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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 (-.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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)) (sqrt (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 #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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 (-.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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)) (sqrt (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 (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 (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 (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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 (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))))) (/.f64 (pow.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 (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 (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 (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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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)))) (*.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))))) (/.f64 (pow.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 (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))))) (/.f64 (pow.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 (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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 (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))))) (/.f64 (pow.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 (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 (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 (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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 (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))))) (/.f64 (pow.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 (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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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)))) (*.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))))) (/.f64 (pow.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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)))) (*.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))))) (/.f64 (pow.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 (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))))) (/.f64 (pow.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 (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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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)))) (*.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))))) (/.f64 (pow.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 (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))))) (/.f64 (pow.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 (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 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 (* (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 (- (/ (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 (* (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 (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 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (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)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow 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 (+ (* (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 (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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 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)) (pow.f64 y-scale #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 y-scale #s(literal 4 binary64))))))
#s(approx (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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 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)) (pow.f64 y-scale #s(literal 4 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 y-scale #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 y-scale #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 (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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 (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 (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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)) (+.f64 (sqrt.f64 (/.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 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)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.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 4 binary64))))))))))
#s(approx (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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)) (+.f64 (sqrt.f64 (/.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 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.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 y-scale #s(literal 4 binary64))) (/.f64 (*.f64 (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)))) (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.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 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (/.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 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)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.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 4 binary64)))))))))))
#s(approx (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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)) (+.f64 (sqrt.f64 (/.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 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 (*.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 4 binary64))) (/.f64 (*.f64 (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)))) (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.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 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.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 4 binary64)))) #s(literal 3 binary64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.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 y-scale #s(literal 4 binary64))) (/.f64 (*.f64 (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)))) (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.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 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (/.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 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)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.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 4 binary64))))))))))))
#s(approx (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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)) (-.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))) (sqrt.f64 (/.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 4 binary64)))))))
#s(approx (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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)) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.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 (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 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (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 4 binary64)) (sqrt.f64 (/.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 4 binary64)))))))))))
#s(approx (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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)) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.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 y-scale #s(literal 4 binary64))) (/.f64 (*.f64 (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)))) (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.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 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (/.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 4 binary64))))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.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 (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 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (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 4 binary64)) (sqrt.f64 (/.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 4 binary64)))))))))))
#s(approx (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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)) (-.f64 (+.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 (*.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 4 binary64))) (/.f64 (*.f64 (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)))) (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.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 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.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 4 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 (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 (*.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 4 binary64))) (/.f64 (*.f64 (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)))) (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.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 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (/.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 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)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.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 4 binary64))))))))))))
#s(approx (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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)) (*.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))) (sqrt.f64 (/.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 4 binary64))))))))
#s(approx (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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)) (+.f64 (*.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))) (sqrt.f64 (/.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 4 binary64)))))) (/.f64 (*.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 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 4 binary64)) (sqrt.f64 (/.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 4 binary64)))))))) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.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 y-scale #s(literal 4 binary64))) (/.f64 (*.f64 (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)))) (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.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 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (/.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 4 binary64))))))) (+.f64 (*.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))) (sqrt.f64 (/.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 4 binary64)))))) (/.f64 (*.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 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 4 binary64)) (sqrt.f64 (/.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 4 binary64)))))))) (pow.f64 b #s(literal 2 binary64)))))))
#s(approx (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.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 y-scale #s(literal 4 binary64))) (/.f64 (*.f64 (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)))) (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.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 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (/.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 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 (*.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 4 binary64))) (/.f64 (*.f64 (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)))) (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.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 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (/.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 4 binary64)))) #s(literal 3 binary64)))))) (+.f64 (*.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))) (sqrt.f64 (/.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 4 binary64)))))) (/.f64 (*.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 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 4 binary64)) (sqrt.f64 (/.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 4 binary64)))))))) (pow.f64 b #s(literal 2 binary64))))))))
#s(approx (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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)) (*.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))) (sqrt.f64 (/.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 4 binary64)))))))))
#s(approx (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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)) (+.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))) (sqrt.f64 (/.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 4 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 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 4 binary64)) (sqrt.f64 (/.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 4 binary64))))))))) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.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 y-scale #s(literal 4 binary64))) (/.f64 (*.f64 (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)))) (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.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 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (/.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 4 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))) (sqrt.f64 (/.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 4 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 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 4 binary64)) (sqrt.f64 (/.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 4 binary64))))))))) (pow.f64 b #s(literal 2 binary64)))))))
#s(approx (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.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 y-scale #s(literal 4 binary64))) (/.f64 (*.f64 (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)))) (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.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 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (/.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 4 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-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 (*.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 4 binary64))) (/.f64 (*.f64 (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)))) (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.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 4 binary64)))) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (/.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 4 binary64)))) #s(literal 3 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))) (sqrt.f64 (/.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 4 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 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 4 binary64)) (sqrt.f64 (/.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 4 binary64))))))))) (pow.f64 b #s(literal 2 binary64))))))))
#s(approx (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))) (/.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))) (sqrt.f64 (/.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 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 (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))) (-.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 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 4 binary64)) (sqrt.f64 (/.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 4 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 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))) (sqrt.f64 (/.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 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 (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))) (sqrt.f64 (/.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 4 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 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (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 x-scale (*.f64 y-scale (-.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 y-scale #s(literal 4 binary64))) (/.f64 (*.f64 (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)))) (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.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 4 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)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (/.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 4 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 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 4 binary64)) (sqrt.f64 (/.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 4 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 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))) (sqrt.f64 (/.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 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 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))) (sqrt.f64 (/.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 4 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 (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 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 4 binary64)) (sqrt.f64 (/.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 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 (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))) (sqrt.f64 (/.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 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 4 binary64)))))))
#s(approx (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (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 x-scale (*.f64 y-scale (-.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 y-scale #s(literal 4 binary64))) (/.f64 (*.f64 (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)))) (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.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 4 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)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (/.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 4 binary64))))))))) (+.f64 (*.f64 #s(literal 1/2 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)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.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 y-scale #s(literal 4 binary64))) (/.f64 (*.f64 (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)))) (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.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 4 binary64)))) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (/.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 4 binary64)))) #s(literal 3 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 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 4 binary64)) (sqrt.f64 (/.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 4 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 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))) (sqrt.f64 (/.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 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 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))) (sqrt.f64 (/.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 4 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)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.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 y-scale #s(literal 4 binary64))) (/.f64 (*.f64 (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)))) (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.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 4 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 (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 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 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 4 binary64)) (sqrt.f64 (/.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 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 (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))) (sqrt.f64 (/.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 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 6 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.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 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 4 binary64)) (sqrt.f64 (/.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 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 (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))) (sqrt.f64 (/.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 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 4 binary64))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.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))) (sqrt.f64 (/.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 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 (* 1/2 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (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 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))) (sqrt.f64 (/.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 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 (/.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 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 4 binary64)) (sqrt.f64 (/.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 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 (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))) (sqrt.f64 (/.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 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 (* 1/2 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (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 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))) (sqrt.f64 (/.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 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 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.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 y-scale #s(literal 4 binary64))) (/.f64 (*.f64 (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)))) (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.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 4 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 (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 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 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 4 binary64)) (sqrt.f64 (/.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 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 (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))) (sqrt.f64 (/.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 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 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 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 4 binary64)) (sqrt.f64 (/.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 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 (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))) (sqrt.f64 (/.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 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 (* 1/2 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (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 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))) (sqrt.f64 (/.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 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 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.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 y-scale #s(literal 4 binary64))) (/.f64 (*.f64 (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)))) (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.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 4 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 (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 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 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 4 binary64)) (sqrt.f64 (/.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 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 (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))) (sqrt.f64 (/.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 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 4 binary64)))) (+.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 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 (*.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 4 binary64))) (/.f64 (*.f64 (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)))) (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.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 4 binary64)))) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (/.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 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 (*.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 4 binary64))) (/.f64 (*.f64 (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)))) (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sqrt.f64 (/.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 4 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 (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 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 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 4 binary64)) (sqrt.f64 (/.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 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 (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))) (sqrt.f64 (/.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 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 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 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 4 binary64)) (sqrt.f64 (/.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 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 (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))) (sqrt.f64 (/.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 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 (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 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (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 (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))))))
#s(approx (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (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 (+.f64 (/.f64 (*.f64 (pow.f64 a #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))) (+.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 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (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 (+.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 (*.f64 (pow.f64 a #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)))) (+.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 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (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 (+.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 (*.f64 (pow.f64 a #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)))) (+.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 (/ (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (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 (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 y-scale #s(literal 2 binary64))))
#s(approx (/ (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (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 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.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 (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 (/ (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (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 (*.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.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 (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 (/ (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (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 (*.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 #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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.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 (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 (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* 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 (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) 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)) y-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) y-scale)))))
#s(approx (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* 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 (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale)) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale))))
#s(approx (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (*.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 (*.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)))))))) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (*.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale))))
#s(approx (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (*.f64 (pow.f64 b #s(literal 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 (*.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)))))))) (pow.f64 b #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale)) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)))))
#s(approx (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) (/.f64 (*.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale)))
#s(approx (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 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)))))) (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))))))) (*.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/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (/.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (/.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))
#s(approx (sqrt (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))
#s(approx (sqrt (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (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 (*.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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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))))) (/.f64 (pow.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))))
#s(approx (sqrt (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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))))) (/.f64 (pow.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #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 (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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)) (sqrt (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (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 (*.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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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))))) (/.f64 (pow.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (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 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (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 (*.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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (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 (*.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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (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 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 (-.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 (cos.f64 (*.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 (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 (cos.f64 (*.f64 #s(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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 (cos.f64 (*.f64 #s(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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 (cos.f64 (*.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 (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 (cos.f64 (*.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))))) (/.f64 (pow.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 (-.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 (cos.f64 (*.f64 #s(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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 (cos.f64 (*.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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 (cos.f64 (*.f64 #s(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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 (cos.f64 (*.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 (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 (cos.f64 (*.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))))) (/.f64 (pow.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 (-.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 (cos.f64 (*.f64 #s(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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 (cos.f64 (*.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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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)))) (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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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))))) (/.f64 (pow.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 (-.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 (cos.f64 (*.f64 #s(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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 (cos.f64 (*.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 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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) (-.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 (cos.f64 (*.f64 #s(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))))) (/.f64 (pow.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 (cos.f64 (*.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 (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) 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))))) (/.f64 (pow.f64 (-.f64 (*.f64 y-scale (+.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.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)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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)))))))) (*.f64 (cos.f64 (*.f64 #s(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 (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) 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))))) (/.f64 (pow.f64 (-.f64 (*.f64 y-scale (+.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.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)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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)))))))) (*.f64 (cos.f64 (*.f64 #s(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 (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) 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))))) (/.f64 (pow.f64 (-.f64 (*.f64 y-scale (+.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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.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)))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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)))))))) (*.f64 (cos.f64 (*.f64 #s(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 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 (*.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 (*.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 (* (* 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 (* angle (PI)) (*.f64 angle (PI.f64)))
#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 (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 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.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 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 2) (pow (cos (* 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 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 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/12597120000 binary64) (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 2) (pow (cos (* 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 a #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 (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)))))) (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 (* (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 (* 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 (* 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))) (+.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 (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (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 #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 (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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 a #s(literal 2 binary64)) (*.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))))))) (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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.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 y-scale #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #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))))) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.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))))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))
#s(approx (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.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 y-scale #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #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))))) (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 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (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/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 (pow.f64 a #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))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.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))))) #s(literal 2 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #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 (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 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 (pow.f64 a #s(literal 2 binary64)) (*.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 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 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 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 a #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))))) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.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))))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.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))))) #s(literal 2 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 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (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 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 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 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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (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/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 (pow.f64 a #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))))) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 a #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 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #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))))) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.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))))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.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))))) #s(literal 2 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 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 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 (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #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))))) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.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))))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.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))))) #s(literal 2 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 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (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 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (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 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)) (pow.f64 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #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))))) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.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))))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.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))))) #s(literal 2 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 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (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 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)) (pow.f64 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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 #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 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (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/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 (pow.f64 a #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))))) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 a #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 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #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))))) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.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))))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.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))))) #s(literal 2 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 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 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #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))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #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))))) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.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))))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.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))))) #s(literal 2 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 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (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 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)) (pow.f64 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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 angle #s(literal 2 binary64)) (*.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 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (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 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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 angle #s(literal 2 binary64)) (+.f64 (*.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 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (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 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 angle #s(literal 2 binary64)) (*.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 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #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))))) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.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))))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.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))))) #s(literal 2 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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 angle #s(literal 2 binary64)) (+.f64 (*.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 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (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 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 angle #s(literal 2 binary64)) (+.f64 (*.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 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #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))))) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.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))))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.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))))) #s(literal 2 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 (pow.f64 angle #s(literal 2 binary64)) (*.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 #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 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (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/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 (pow.f64 a #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))))) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 a #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 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #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))))) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.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))))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.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))))) #s(literal 2 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 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 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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 angle #s(literal 2 binary64)) (*.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 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (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 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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 angle #s(literal 2 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 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (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 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 angle #s(literal 2 binary64)) (*.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 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #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))))) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.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))))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.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))))) #s(literal 2 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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 angle #s(literal 2 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 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (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 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 angle #s(literal 2 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 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #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))))) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.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))))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.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))))) #s(literal 2 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 (pow.f64 angle #s(literal 2 binary64)) (*.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 #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 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (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/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 (pow.f64 a #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))))) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 a #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 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #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))))) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.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))))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.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))))) #s(literal 2 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 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 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))) (*.f64 #s(literal 180 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 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (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 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 (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 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 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (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 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 (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))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (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 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 (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 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 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (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 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 (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 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 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #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))))) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.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))))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.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))))) #s(literal 2 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 (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 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (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 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 (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))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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 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))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (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 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 (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 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 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (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 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 (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 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 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #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))))) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.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))))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.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))))) #s(literal 2 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 (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 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 #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 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (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/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 (pow.f64 a #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))))) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 a #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 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #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))))) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.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))))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.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))))) #s(literal 2 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 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 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #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))))) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.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))))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.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))))) #s(literal 2 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 (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 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (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 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 (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))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (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 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 (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))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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 (*.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 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (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 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 (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))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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 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))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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 (* 1/2 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* 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 (* 1/2 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (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 (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 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (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 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 (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))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) angle))
#s(approx (* 1/2 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (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 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 (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 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #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))))) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.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))))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.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))))) #s(literal 2 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 (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 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (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 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 (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))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (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 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 (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))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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 (* 1/2 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (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 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 (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 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (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 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 (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))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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 #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 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (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/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 (pow.f64 a #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))))) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 a #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 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #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))))) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.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))))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.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))))) #s(literal 2 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 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 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #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))))) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.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))))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.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))))) #s(literal 2 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 (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 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (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 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 (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))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (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 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 (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))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #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))))) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.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))))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.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))))) #s(literal 2 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 (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 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (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 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 (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))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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 (+ (* (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 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (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 a #s(literal 4 binary64)))))
#s(approx (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))) (-.f64 (+.f64 (*.f64 (pow.f64 angle #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 (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)))))) (pow.f64 a #s(literal 2 binary64))) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))
#s(approx (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))) (-.f64 (+.f64 (*.f64 (pow.f64 angle #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 (*.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 (*.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 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)))))) (pow.f64 a #s(literal 2 binary64))) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))
#s(approx (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))) (-.f64 (+.f64 (*.f64 (pow.f64 angle #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 (*.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 (*.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 (*.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 #s(literal 1/2 binary64) (/.f64 (-.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)))))) (pow.f64 a #s(literal 2 binary64))) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))
#s(approx (/ (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (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 a #s(literal 4 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (/ (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (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 (*.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 (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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (/ (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (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 (*.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 #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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (/ (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (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 (*.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 #s(literal 1/2 binary64) (/.f64 (-.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 (*.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 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (sqrt.f64 (pow.f64 a #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)))) (-.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 (* (PI) (* 1/180 angle))) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))
#s(approx (cos (* 2 (* (PI) (* 1/180 angle)))) (+.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 (cos (* 2 (* (PI) (* 1/180 angle)))) (+.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 (* (PI) (* 1/180 angle)))) (+.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 (* (PI) (* 1/180 angle))))) #s(literal 1/2 binary64))
#s(approx (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle))))) (+.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 (* (PI) (* 1/180 angle))))) (+.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 (* (PI) (* 1/180 angle))))) (+.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 (* (PI) (* 1/180 angle)))))) (+.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 (* (PI) (* 1/180 angle)))))) (+.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 (* (PI) (* 1/180 angle)))))) (* 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 (* (PI) (* 1/180 angle)))))) (* 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 (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (*.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 (* (PI) (* 1/180 angle)))))) (*.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 (* (PI) (* 1/180 angle)))))) (*.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 (* (PI) (* 1/180 angle)))))) (* b b)) (*.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 (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (*.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 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* 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 (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* 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 (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) 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 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) y-scale))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) y-scale)))
#s(approx (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) 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 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) y-scale)) (*.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))) y-scale)) (*.f64 #s(literal 1/765275040000000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64))) y-scale)))))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) y-scale)))
#s(approx (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* 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 (* (PI) (* 1/180 angle)))))) (* 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 (* (PI) (* 1/180 angle)))))) (* 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 (* (PI) (* 1/180 angle)))))) (* 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 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* 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 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* 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 (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale)) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale))
#s(approx (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale) (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #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))))))) y-scale)))
#s(approx (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale)) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #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))))))) y-scale) (/.f64 (*.f64 (pow.f64 x-scale #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)))))) y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)))
#s(approx (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale)) (+.f64 (*.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 x-scale #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))))))) y-scale) (/.f64 (*.f64 (pow.f64 x-scale #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)))))) y-scale))) (/.f64 (*.f64 (pow.f64 x-scale #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)))))) y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)))
#s(approx (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale))
#s(approx (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (+.f64 (*.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 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale)))
#s(approx (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (+.f64 (*.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 #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 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 (pow.f64 b #s(literal 2 binary64)) y-scale)))
#s(approx (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (+.f64 (*.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 #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 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 (pow.f64 angle #s(literal 2 binary64)) (*.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 (pow.f64 b #s(literal 2 binary64)) y-scale)))
#s(approx (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)))
#s(approx (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (-.f64 (+.f64 (*.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 #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 x-scale #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)))))) y-scale))) (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale)) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)))
#s(approx (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (-.f64 (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.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 (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 #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 x-scale #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)))))) y-scale)))) (/.f64 (*.f64 (pow.f64 x-scale #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)))))) y-scale))) (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale)) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)))
#s(approx (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (-.f64 (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.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 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.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 (pow.f64 angle #s(literal 2 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 (*.f64 (pow.f64 x-scale #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)))))) y-scale)))) (/.f64 (*.f64 (pow.f64 x-scale #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)))))) y-scale)))) (/.f64 (*.f64 (pow.f64 x-scale #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)))))) y-scale))) (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale)) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)))
#s(approx (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale)))
#s(approx (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-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 (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-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 #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/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/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (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 (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-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 #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 (*.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/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/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/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (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 (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (/.f64 (pow.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (-.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 (*.f64 (pow.f64 x-scale #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)))))) y-scale)) (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (-.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 (*.f64 (pow.f64 x-scale #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)))))) y-scale)) (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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 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 (*.f64 (pow.f64 x-scale #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)))))) y-scale)) (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 (-.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 (*.f64 (pow.f64 x-scale #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)))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (/.f64 (pow.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (-.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 (*.f64 (pow.f64 x-scale #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)))))) y-scale)) (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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 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 (*.f64 (pow.f64 x-scale #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)))))) y-scale)) (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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 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 (*.f64 (pow.f64 x-scale #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)))))) y-scale)) (-.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 (*.f64 (pow.f64 x-scale #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)))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (-.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 (*.f64 (pow.f64 x-scale #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)))))) y-scale)) (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (/.f64 (pow.f64 (-.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 (*.f64 (pow.f64 x-scale #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)))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (/.f64 (pow.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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 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 (*.f64 (pow.f64 x-scale #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)))))) y-scale)) (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (/.f64 (pow.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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 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 (*.f64 (pow.f64 x-scale #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)))))) y-scale)) (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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 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 (*.f64 (pow.f64 x-scale #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)))))) y-scale)) (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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 (pow.f64 (-.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 (*.f64 (pow.f64 x-scale #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)))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (/.f64 (pow.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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 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 (*.f64 (pow.f64 x-scale #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)))))) y-scale)) (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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 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 (*.f64 (pow.f64 x-scale #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)))))) y-scale)) (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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 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 (*.f64 (pow.f64 x-scale #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)))))) y-scale)) (-.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 (*.f64 (pow.f64 x-scale #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)))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (-.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 (*.f64 (pow.f64 x-scale #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)))))) y-scale)) (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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 (pow.f64 (-.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 (*.f64 (pow.f64 x-scale #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)))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))) (/.f64 (pow.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (sqrt (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) 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 (pow.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (sqrt (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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 (pow.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 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 (*.f64 (pow.f64 x-scale #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)))))) y-scale)) (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (pow.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (sqrt (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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 (pow.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #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/2 binary64) (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (-.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 (*.f64 (pow.f64 x-scale #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)))))) y-scale)) (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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 (pow.f64 (-.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 (*.f64 (pow.f64 x-scale #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)))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 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 (*.f64 (pow.f64 x-scale #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)))))) y-scale)) (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (pow.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-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 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 (*.f64 (pow.f64 x-scale #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)))))) y-scale)) (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (pow.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (sqrt (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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 (pow.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #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/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 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 (*.f64 (pow.f64 x-scale #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)))))) y-scale)) (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (pow.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #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/2 binary64) (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (-.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 (*.f64 (pow.f64 x-scale #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)))))) y-scale)) (-.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 (*.f64 (pow.f64 x-scale #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)))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (-.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 (*.f64 (pow.f64 x-scale #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)))))) y-scale)) (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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 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 (*.f64 (pow.f64 x-scale #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)))))) y-scale)) (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (-.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 (*.f64 (pow.f64 x-scale #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)))))) y-scale)) (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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 (pow.f64 (-.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 (*.f64 (pow.f64 x-scale #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)))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 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 (*.f64 (pow.f64 x-scale #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)))))) y-scale)) (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (pow.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (-.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 (*.f64 (pow.f64 x-scale #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)))))) y-scale)) (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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 (pow.f64 (-.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 (*.f64 (pow.f64 x-scale #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)))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 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 (*.f64 (pow.f64 x-scale #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)))))) y-scale)) (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #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 (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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 (/.f64 (pow.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) #s(literal 2 binary64)) (*.f64 (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 (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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 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 (*.f64 (pow.f64 x-scale #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)))))) y-scale)) (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (pow.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #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)))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) #s(literal 2 binary64)) (*.f64 (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 (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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 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 (*.f64 (pow.f64 x-scale #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)))))) y-scale)) (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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 (pow.f64 (-.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 (*.f64 (pow.f64 x-scale #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)))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 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 (*.f64 (pow.f64 x-scale #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)))))) y-scale)) (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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/32400 binary64) (/.f64 (*.f64 (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 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 (*.f64 (pow.f64 x-scale #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)))))) y-scale)) (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (pow.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #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)))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) #s(literal 2 binary64)) (*.f64 (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 (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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 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 (*.f64 (pow.f64 x-scale #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)))))) y-scale)) (-.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 (*.f64 (pow.f64 x-scale #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)))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (-.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 (*.f64 (pow.f64 x-scale #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)))))) y-scale)) (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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 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 (*.f64 (pow.f64 x-scale #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)))))) y-scale)) (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (-.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 (*.f64 (pow.f64 x-scale #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)))))) y-scale)) (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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 (pow.f64 (-.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 (*.f64 (pow.f64 x-scale #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)))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 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 (*.f64 (pow.f64 x-scale #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)))))) y-scale)) (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (-.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 (*.f64 (pow.f64 x-scale #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)))))) y-scale)) (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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 (pow.f64 (-.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 (*.f64 (pow.f64 x-scale #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)))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 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 (*.f64 (pow.f64 x-scale #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)))))) y-scale)) (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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/32400 binary64) (/.f64 (*.f64 (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 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 (*.f64 (pow.f64 x-scale #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)))))) y-scale)) (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (pow.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #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)))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) #s(literal 2 binary64)) (*.f64 (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 (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow 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 (/.f64 (pow.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) #s(literal 2 binary64)) (*.f64 (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))))))) (*.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 (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 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 (*.f64 (pow.f64 x-scale #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)))))) y-scale)) (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (pow.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (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 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 (/.f64 (pow.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) #s(literal 2 binary64)) (*.f64 (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)))))))) (*.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 (/.f64 (pow.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) #s(literal 2 binary64)) (*.f64 (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))))))) (*.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 (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/.f64 (pow.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) #s(literal 2 binary64)) (*.f64 (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))))))) (*.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 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 (*.f64 (pow.f64 x-scale #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)))))) y-scale)) (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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 (pow.f64 (-.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 (*.f64 (pow.f64 x-scale #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)))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 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 (*.f64 (pow.f64 x-scale #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)))))) y-scale)) (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 (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 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 (*.f64 (pow.f64 x-scale #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)))))) y-scale)) (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (pow.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (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 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 (/.f64 (pow.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) #s(literal 2 binary64)) (*.f64 (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)))))))) (*.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 (/.f64 (pow.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) #s(literal 2 binary64)) (*.f64 (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)))))))) (*.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 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 (*.f64 (pow.f64 x-scale #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)))))) y-scale)) (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (pow.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (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 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 (/.f64 (pow.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) #s(literal 2 binary64)) (*.f64 (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)))))))) (*.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 (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/.f64 (pow.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) #s(literal 2 binary64)) (*.f64 (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))))))) (*.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 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 (*.f64 (pow.f64 x-scale #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)))))) y-scale)) (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (pow.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (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 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 (/.f64 (pow.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) #s(literal 2 binary64)) (*.f64 (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)))))))) (*.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 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 (*.f64 (pow.f64 x-scale #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)))))) y-scale)) (-.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 (*.f64 (pow.f64 x-scale #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)))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (-.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 (*.f64 (pow.f64 x-scale #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)))))) y-scale)) (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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 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 (*.f64 (pow.f64 x-scale #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)))))) y-scale)) (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (-.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 (*.f64 (pow.f64 x-scale #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)))))) y-scale)) (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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 (pow.f64 (-.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 (*.f64 (pow.f64 x-scale #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)))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 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 (*.f64 (pow.f64 x-scale #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)))))) y-scale)) (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 (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 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 (*.f64 (pow.f64 x-scale #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)))))) y-scale)) (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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 (pow.f64 (-.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 (*.f64 (pow.f64 x-scale #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)))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 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 (*.f64 (pow.f64 x-scale #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)))))) y-scale)) (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 (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 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 (*.f64 (pow.f64 x-scale #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)))))) y-scale)) (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (pow.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (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 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 (/.f64 (pow.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) #s(literal 2 binary64)) (*.f64 (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)))))))) (*.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 (/.f64 (pow.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) #s(literal 2 binary64)) (*.f64 (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)))))))) (*.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 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 (*.f64 (pow.f64 x-scale #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)))))) y-scale)) (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (pow.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (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 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 (/.f64 (pow.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) #s(literal 2 binary64)) (*.f64 (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)))))))) (*.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 (/.f64 (pow.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) #s(literal 2 binary64)) (*.f64 (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)))))))) (*.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 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 (*.f64 (pow.f64 x-scale #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)))))) y-scale)) (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 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 (pow.f64 (-.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 (*.f64 (pow.f64 x-scale #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)))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 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 (*.f64 (pow.f64 x-scale #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)))))) y-scale)) (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 (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 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 (*.f64 (pow.f64 x-scale #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)))))) y-scale)) (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (pow.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (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 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 (/.f64 (pow.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) #s(literal 2 binary64)) (*.f64 (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)))))))) (*.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 (/.f64 (pow.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) #s(literal 2 binary64)) (*.f64 (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)))))))) (*.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 (* (* 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 (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 (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 (* (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 (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow 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 (+ (* (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 (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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 (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 (* 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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 (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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 (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (*.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))))))
#s(approx (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (*.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)))))))
#s(approx (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))) (/.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 (* 1/2 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.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 (+ (* (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 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 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))) (*.f64 (pow.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)))))
#s(approx (/ (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (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 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.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))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 (cos (* 2 (* (PI) (* 1/180 angle)))) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))
#s(approx (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle))))) (*.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 (* (PI) (* 1/180 angle)))))) (+.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 (* (PI) (* 1/180 angle)))))) (-.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 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) 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)))))))) y-scale))
#s(approx (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale)) (/.f64 (*.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))))))))) y-scale))
#s(approx (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (*.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))))))))))
#s(approx (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (-.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 (*.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))))))))) y-scale)))
#s(approx (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) (/.f64 (-.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 (*.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))))))))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale)))
#s(approx (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (/.f64 (pow.f64 (-.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 (*.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))))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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))))) (/.f64 (pow.f64 (-.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 (*.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))))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (sqrt (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) 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))))) (/.f64 (pow.f64 (-.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 (*.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))))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #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 (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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))))) (/.f64 (pow.f64 (-.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 (*.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))))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow 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))))) (/.f64 (pow.f64 (-.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 (*.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))))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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)))))))) (*.f64 (cos.f64 (*.f64 #s(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 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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 (* (* x-scale x-scale) y-scale) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))
#s(approx (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (+.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)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) 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))))))) y-scale)))) (*.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)))))))))))
#s(approx (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-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 x-scale #s(literal 2 binary64))))
#s(approx (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.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))))))) 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))))))) 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))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(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 (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (/.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.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))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #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 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) 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))))))) y-scale)))) y-scale)) (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 binary64))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale 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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #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 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) 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))))))) y-scale))) y-scale)) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.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))))))) 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))))))) y-scale)) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 binary64))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #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 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) 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))))))) y-scale))) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 binary64))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #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 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) 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))))))) y-scale))) 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)) (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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.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))))))) 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))))))) y-scale)) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 binary64))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (sqrt (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (sqrt (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #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 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) 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))))))) y-scale))) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (sqrt (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(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 (pow.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))))))) 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))))))) y-scale)) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.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 (pow.f64 b #s(literal 2 binary64)) (+.f64 #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 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) 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))))))) y-scale))) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.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 (pow.f64 b #s(literal 2 binary64)) (+.f64 #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 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) 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))))))) y-scale))) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 binary64)))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (sqrt (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #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 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) 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))))))) y-scale))) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #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 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) 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))))))) y-scale))) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (/.f64 (pow.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))))))) 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))))))) y-scale)) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.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 (pow.f64 b #s(literal 2 binary64)) (+.f64 #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 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) 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))))))) y-scale))) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.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))))))) 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))))))) y-scale)) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.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 (pow.f64 b #s(literal 2 binary64)) (+.f64 #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 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) 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))))))) y-scale))) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(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 (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(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 (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #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 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) 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))))))) y-scale))) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 binary64))))))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(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 (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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 (/.f64 (pow.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))))))) 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))))))) y-scale)) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.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 (pow.f64 b #s(literal 2 binary64)) (+.f64 #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 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) 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))))))) y-scale))) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #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 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) 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))))))) y-scale))) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 binary64))))))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(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 (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #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 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) 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))))))) y-scale))) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (/.f64 (pow.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))))))) 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))))))) y-scale)) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.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 (pow.f64 b #s(literal 2 binary64)) (+.f64 #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 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) 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))))))) y-scale))) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.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))))))) 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))))))) y-scale)) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.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 (pow.f64 b #s(literal 2 binary64)) (+.f64 #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 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) 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))))))) y-scale))) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 binary64))))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #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 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) 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))))))) y-scale))) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 binary64))))))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(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 (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow 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)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(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 (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #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 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) 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))))))) y-scale))) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(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 (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(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 (/.f64 (pow.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))))))) 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))))))) y-scale)) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.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 (pow.f64 b #s(literal 2 binary64)) (+.f64 #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 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) 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))))))) y-scale))) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(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)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #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 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) 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))))))) y-scale))) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(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 (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #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 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) 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))))))) y-scale))) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(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 (/.f64 (pow.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))))))) 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))))))) y-scale)) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.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 (pow.f64 b #s(literal 2 binary64)) (+.f64 #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 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) 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))))))) y-scale))) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(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)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #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 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) 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))))))) y-scale))) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (/.f64 (pow.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))))))) 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))))))) y-scale)) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.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 (pow.f64 b #s(literal 2 binary64)) (+.f64 #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 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) 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))))))) y-scale))) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(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)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(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 (- (/ (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 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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-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)))) (-.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 (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (*.f64 #s(literal -1 binary64) (*.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))))))) 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))))))) y-scale)))))
#s(approx (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (/.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))))))))) (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))))))) 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))))))) y-scale)))))
#s(approx (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) (*.f64 #s(literal -1 binary64) (/.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))))))) 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))))))) y-scale)) y-scale)))
#s(approx (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) (+.f64 (*.f64 #s(literal -1 binary64) (/.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))))))) 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))))))) 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))))))) (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 (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (/.f64 (pow.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))))))) 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))))))) y-scale)) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (+.f64 (*.f64 #s(literal -2 binary64) (/.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 (pow.f64 b #s(literal 2 binary64)) (+.f64 #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 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) 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))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))) (/.f64 (pow.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))))))) 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))))))) y-scale)) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (+.f64 (*.f64 #s(literal -2 binary64) (/.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 (pow.f64 b #s(literal 2 binary64)) (+.f64 #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 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) 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))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))) (+.f64 (/.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.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))))))) 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))))))) y-scale)) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #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 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) 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))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) 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)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(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 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) 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))))))) y-scale)) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #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 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) 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))))))) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) 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)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(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)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.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))))))) 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))))))) y-scale)) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (sqrt (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) 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 (pow.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))))))) 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))))))) y-scale)) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (sqrt (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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 (pow.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))))))) 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))))))) y-scale)) #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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #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 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) 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))))))) y-scale))) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (/.f64 (pow.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))))))) 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))))))) y-scale)) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (sqrt (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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 (pow.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))))))) 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))))))) y-scale)) #s(literal 2 binary64)) (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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #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 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) 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))))))) y-scale))) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (/.f64 (pow.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))))))) 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))))))) y-scale)) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.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 (pow.f64 b #s(literal 2 binary64)) (+.f64 #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 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) 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))))))) y-scale))) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (/.f64 (pow.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))))))) 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))))))) y-scale)) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.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))))))) 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))))))) y-scale)) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (sqrt (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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 (pow.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))))))) 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))))))) y-scale)) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.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 (pow.f64 b #s(literal 2 binary64)) (+.f64 #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 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) 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))))))) y-scale))) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.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 (pow.f64 b #s(literal 2 binary64)) (+.f64 #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 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) 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))))))) y-scale))) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (/.f64 (pow.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))))))) 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))))))) y-scale)) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.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))))))) 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))))))) y-scale)) #s(literal 2 binary64)) (pow.f64 y-scale #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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #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 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) 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))))))) y-scale))) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (/.f64 (pow.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))))))) 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))))))) y-scale)) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.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 (pow.f64 b #s(literal 2 binary64)) (+.f64 #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 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) 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))))))) y-scale))) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (/.f64 (pow.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))))))) 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))))))) y-scale)) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.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))))))) 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))))))) y-scale)) #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 (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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 (/.f64 (pow.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))))))) 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))))))) y-scale)) #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 (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #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 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) 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))))))) y-scale))) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (/.f64 (pow.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))))))) 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))))))) y-scale)) #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)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) 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))))))) y-scale)) #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 (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.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 (pow.f64 b #s(literal 2 binary64)) (+.f64 #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 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) 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))))))) y-scale))) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (/.f64 (pow.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))))))) 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))))))) y-scale)) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.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))))))) 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))))))) y-scale)) #s(literal 2 binary64)) (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))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (sqrt.f64 (/.f64 (pow.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))))))) 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))))))) y-scale)) #s(literal 2 binary64)) (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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #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 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) 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))))))) y-scale))) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (/.f64 (pow.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))))))) 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))))))) y-scale)) #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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #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 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) 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))))))) y-scale))) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.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 (pow.f64 b #s(literal 2 binary64)) (+.f64 #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 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) 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))))))) y-scale))) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (/.f64 (pow.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))))))) 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))))))) y-scale)) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.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))))))) 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))))))) y-scale)) #s(literal 2 binary64)) (pow.f64 y-scale #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 (/.f64 (pow.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))))))) 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))))))) y-scale)) #s(literal 2 binary64)) (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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #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 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) 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))))))) y-scale))) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (/.f64 (pow.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))))))) 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))))))) y-scale)) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.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 (pow.f64 b #s(literal 2 binary64)) (+.f64 #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 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) 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))))))) y-scale))) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (/.f64 (pow.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))))))) 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))))))) y-scale)) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.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))))))) 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))))))) y-scale)) #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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow 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 (/.f64 (pow.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))))))) 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))))))) y-scale)) #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 (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 (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #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 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) 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))))))) y-scale))) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (/.f64 (pow.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))))))) 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))))))) y-scale)) #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)))))) (*.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 (/.f64 (pow.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))))))) 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))))))) y-scale)) #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 (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 (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #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 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) 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))))))) y-scale))) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (/.f64 (pow.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))))))) 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))))))) y-scale)) #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)))))) (*.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)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.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 (pow.f64 b #s(literal 2 binary64)) (+.f64 #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 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) 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))))))) y-scale))) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (/.f64 (pow.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))))))) 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))))))) y-scale)) #s(literal 2 binary64)) (pow.f64 y-scale #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 (/.f64 (pow.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))))))) 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))))))) y-scale)) #s(literal 2 binary64)) (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/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 (/.f64 (pow.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))))))) 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))))))) y-scale)) #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 (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 (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #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 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) 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))))))) y-scale))) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (/.f64 (pow.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))))))) 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))))))) y-scale)) #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)))))) (*.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)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.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 (pow.f64 b #s(literal 2 binary64)) (+.f64 #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 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) 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))))))) y-scale))) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (/.f64 (pow.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))))))) 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))))))) y-scale)) #s(literal 2 binary64)) (pow.f64 y-scale #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 (/.f64 (pow.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))))))) 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))))))) y-scale)) #s(literal 2 binary64)) (pow.f64 y-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/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.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 (pow.f64 b #s(literal 2 binary64)) (+.f64 #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 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) 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))))))) y-scale))) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.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 (pow.f64 b #s(literal 2 binary64)) (+.f64 #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 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) 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))))))) y-scale))) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (/.f64 (pow.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))))))) 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))))))) y-scale)) #s(literal 2 binary64)) (pow.f64 y-scale #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 (/.f64 (pow.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))))))) 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))))))) y-scale)) #s(literal 2 binary64)) (pow.f64 y-scale #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 (/.f64 (pow.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))))))) 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))))))) y-scale)) #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 (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 (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) 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))))) (/.f64 (pow.f64 (-.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 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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)))))))) (*.f64 (cos.f64 (*.f64 #s(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 (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) 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))))) (/.f64 (pow.f64 (-.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 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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)))))))) (*.f64 (cos.f64 (*.f64 #s(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 (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) 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))))) (/.f64 (pow.f64 (-.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 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) y-scale))) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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)))))))) (*.f64 (cos.f64 (*.f64 #s(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 (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (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 (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 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 (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 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 (/.f64 (pow.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))))))) 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))))))) y-scale)) #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 (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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #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 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) 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))))))) y-scale))) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (/.f64 (pow.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))))))) 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))))))) y-scale)) #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)))))) (*.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 (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 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 (/.f64 (pow.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))))))) 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))))))) y-scale)) #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 (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)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.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 (pow.f64 b #s(literal 2 binary64)) (+.f64 #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 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) 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))))))) y-scale))) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (/.f64 (pow.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))))))) 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))))))) y-scale)) #s(literal 2 binary64)) (pow.f64 y-scale #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 (/.f64 (pow.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))))))) 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))))))) y-scale)) #s(literal 2 binary64)) (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/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.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 (pow.f64 b #s(literal 2 binary64)) (+.f64 #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 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) 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))))))) y-scale))) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (/.f64 (pow.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))))))) 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))))))) y-scale)) #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)))))) (*.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 (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 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 (/.f64 (pow.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))))))) 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))))))) y-scale)) #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 (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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #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 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) 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))))))) y-scale))) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.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 (pow.f64 b #s(literal 2 binary64)) (+.f64 #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 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) 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))))))) y-scale))) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (/.f64 (pow.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))))))) 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))))))) y-scale)) #s(literal 2 binary64)) (pow.f64 y-scale #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 (/.f64 (pow.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))))))) 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))))))) y-scale)) #s(literal 2 binary64)) (pow.f64 y-scale #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)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.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 (pow.f64 b #s(literal 2 binary64)) (+.f64 #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 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) 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))))))) y-scale))) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (/.f64 (pow.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))))))) 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))))))) y-scale)) #s(literal 2 binary64)) (pow.f64 y-scale #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 (/.f64 (pow.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))))))) 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))))))) y-scale)) #s(literal 2 binary64)) (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/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.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 (pow.f64 b #s(literal 2 binary64)) (+.f64 #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 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) 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))))))) y-scale))) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (/.f64 (pow.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))))))) 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))))))) y-scale)) #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)))))) (*.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 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 (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 #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 (+.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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow 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 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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 (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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 (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 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)))) y-scale))
#s(approx (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (/.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))))) y-scale))
#s(approx (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))) (/.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)))) (/.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 (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (*.f64 #s(literal -1 binary64) (/.f64 (*.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))))))))) y-scale)))
#s(approx (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (/.f64 (-.f64 (*.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))))))))) (*.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)))))))))) y-scale))
#s(approx (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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 y-scale #s(literal 2 binary64)))))
#s(approx (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) (/.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 #s(literal 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 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(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)))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (/.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.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(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.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))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #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)))))))))) (pow.f64 x-scale #s(literal 2 binary64)))) (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.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(literal 2 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale 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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #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))))))))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 binary64))) (pow.f64 x-scale #s(literal 4 binary64))))) (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.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(literal 2 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #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))))))))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.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(literal 2 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #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))))))))) (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 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 binary64))) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.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(literal 2 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (sqrt (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.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(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (sqrt (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.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(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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #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))))))))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.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(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (sqrt (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.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(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 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 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 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #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))))))))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.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(literal 2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.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(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.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 (pow.f64 b #s(literal 2 binary64)) (-.f64 #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))))))))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.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(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (sqrt (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.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(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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #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))))))))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.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(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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #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))))))))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (/.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 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 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #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))))))))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.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(literal 2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.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(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 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 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #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))))))))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.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(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.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(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 (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.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(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 (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #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))))))))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.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(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.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)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.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(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 (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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 (/.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 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 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #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))))))))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.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(literal 2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.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(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.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 (pow.f64 b #s(literal 2 binary64)) (-.f64 #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))))))))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.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(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.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(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 (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #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))))))))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (/.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 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 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #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))))))))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.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(literal 2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.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(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 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 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #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))))))))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.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(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.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(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.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 (pow.f64 b #s(literal 2 binary64)) (-.f64 #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))))))))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.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(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.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(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 (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow 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)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.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(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 (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #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))))))))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.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(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.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(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(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 (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.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(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #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))))))))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.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(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 (/.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 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 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #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))))))))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.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(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)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.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(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 (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.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(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #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))))))))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.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(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 (/.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 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 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #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))))))))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.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(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)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.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(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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #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))))))))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (/.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 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 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #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))))))))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.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(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)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.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(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 (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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow 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)))) (*.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 (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.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)))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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 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 (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (+.f64 (*.f64 #s(literal -2 binary64) (/.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 (pow.f64 b #s(literal 2 binary64)) (-.f64 #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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))
#s(approx (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (+.f64 (*.f64 #s(literal -2 binary64) (/.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 (pow.f64 b #s(literal 2 binary64)) (-.f64 #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 (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)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.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(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))
#s(approx (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #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 (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 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))
#s(approx (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #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 (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)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.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(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))
#s(approx (sqrt (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) 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 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))
#s(approx (sqrt (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.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 (pow.f64 b #s(literal 2 binary64)) (-.f64 #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))))))))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (/.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))
#s(approx (sqrt (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 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 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #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))))))))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (/.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.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(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.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 (pow.f64 b #s(literal 2 binary64)) (-.f64 #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))))))))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (/.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 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 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))
#s(approx (sqrt (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 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 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #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))))))))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.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(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.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 (pow.f64 b #s(literal 2 binary64)) (-.f64 #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))))))))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (/.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 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 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 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 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #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))))))))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (/.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.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(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.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 (pow.f64 b #s(literal 2 binary64)) (-.f64 #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))))))))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (/.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 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 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 binary64)) (pow.f64 x-scale #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 (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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 (/.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 binary64)) (pow.f64 x-scale #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 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.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 (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 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 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #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))))))))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (/.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 binary64)) (pow.f64 x-scale #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 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.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 (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.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(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.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 (pow.f64 b #s(literal 2 binary64)) (-.f64 #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))))))))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (/.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 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 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 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 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #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))))))))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (/.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 binary64)) (pow.f64 x-scale #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 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.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 (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #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))))))))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.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(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.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 (pow.f64 b #s(literal 2 binary64)) (-.f64 #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))))))))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (/.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 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 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 (/.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 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 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #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))))))))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (/.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.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(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.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 (pow.f64 b #s(literal 2 binary64)) (-.f64 #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))))))))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (/.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 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 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 binary64)) (pow.f64 x-scale #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 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.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 (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow 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 (/.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 binary64)) (pow.f64 x-scale #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 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-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 (/.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 binary64)) (pow.f64 x-scale #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 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #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))))))))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (/.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-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 (/.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 binary64)) (pow.f64 x-scale #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 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.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(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.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 (pow.f64 b #s(literal 2 binary64)) (-.f64 #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))))))))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (/.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 (/.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 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 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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #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))))))))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (/.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-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 (/.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 binary64)) (pow.f64 x-scale #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 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.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(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.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 (pow.f64 b #s(literal 2 binary64)) (-.f64 #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))))))))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (/.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 (/.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 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/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.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 (pow.f64 b #s(literal 2 binary64)) (-.f64 #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))))))))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.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(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.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 (pow.f64 b #s(literal 2 binary64)) (-.f64 #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))))))))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (/.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 (/.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 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 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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #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))))))))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (/.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 (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 (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) 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))))) (/.f64 (pow.f64 (-.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 (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 (*.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))))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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)))))))) (*.f64 (cos.f64 (*.f64 #s(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 (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) 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))))) (/.f64 (pow.f64 (-.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 (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 (*.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))))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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)))))))) (*.f64 (cos.f64 (*.f64 #s(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 (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) 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))))) (/.f64 (pow.f64 (-.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 (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 (*.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))))))))) y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 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)))))))) (*.f64 (cos.f64 (*.f64 #s(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 (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (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 (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 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 (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.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 #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 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 (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #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))))))))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (/.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 (/.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 binary64)) (pow.f64 x-scale #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 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #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))))))))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (/.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.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(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.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 (pow.f64 b #s(literal 2 binary64)) (-.f64 #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))))))))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (/.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 (/.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 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 1/2 binary64) (/.f64 (*.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 binary64)) (pow.f64 x-scale #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 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #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))))))))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (/.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #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))))))))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.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(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.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 (pow.f64 b #s(literal 2 binary64)) (-.f64 #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))))))))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (/.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 (/.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 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/4 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.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(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.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 (pow.f64 b #s(literal 2 binary64)) (-.f64 #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))))))))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (/.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 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 (/.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 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 1/2 binary64) (/.f64 (*.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 binary64)) (pow.f64 x-scale #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 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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)))))))))))))
Calls

15 calls:

TimeVariablePoint
31.0ms
angle
0
30.0ms
y-scale
0
24.0ms
b
inf
21.0ms
a
0
20.0ms
b
0

rewrite350.0ms (3.2%)

Memory
5.6MiB live, 253.3MiB allocated; 36ms collecting garbage
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
01727751
03007095
114316965
040816965
Stop Event
iter-limit
node-limit
iter-limit
Counts
137 → 1 393
Calls
Call 1
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))
(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))
#s(literal 1/180 binary64)
(*.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))))
(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 (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))))
(pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))
(*.f64 (pow.f64 b #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 y-scale #s(literal 2 binary64))
(/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(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 (cos.f64 (*.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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))
(*.f64 (pow.f64 b #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 x-scale #s(literal 2 binary64))
#s(literal 1/2 binary64)
#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))))
(*.f64 (cos.f64 (*.f64 #s(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/180 binary64) angle)
(/.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 (/.f64 (pow.f64 b #s(literal 2 binary64)) (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))
(*.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)))))
(sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(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)))))
#s(literal 90 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 (*.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))))))))
(pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 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 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 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 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)))))))))
(sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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 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 (*.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))))))
(*.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 #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))))))))
(pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 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 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.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 (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.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 (pow.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 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))
(*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))
(cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))))
(*.f64 b b)
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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/2 binary64) (*.f64 #s(literal 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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #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) 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 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(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) (*.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 (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(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))
(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))) 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)) #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))) 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)) #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 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(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)) #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 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(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)) #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 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(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)) #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 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(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)) #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 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(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)) #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 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(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)) #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)))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow 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)))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow 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)))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow 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)))))))))
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow 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 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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))
(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)))
(/.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 (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.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)))
Outputs
#s(literal 180 binary64)
a
angle
(*.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) #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 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))
(*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) 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 (PI.f64) angle) #s(literal 1/180 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(cos.f64 (neg.f64 (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(cos.f64 (fabs.f64 (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(cos.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))
(cos.f64 (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))
(cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(+.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a)
(*.f64 a (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))
#s(literal 2 binary64)
(*.f64 (fabs.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a)) (fabs.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a)))
(*.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a)) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a)))
(*.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 1 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 1 binary64)) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a))
(*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)
(*.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 a a))
(*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))))
(*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a))
(pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a)) #s(literal 2 binary64)))
b
(sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b)
(*.f64 b (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))
(*.f64 (fabs.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b)) (fabs.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b)))
(*.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b)) (neg.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b)))
(*.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b) #s(literal 1 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b) #s(literal 1 binary64)) (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b))
(*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b)
(*.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))))
(*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b) (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b))
(pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b)) #s(literal 2 binary64)))
(*.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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64)))))) (*.f64 a a)))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64)))))) (*.f64 a a))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 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 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 (neg.f64 (*.f64 b b)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) #s(literal 2 binary64)) (*.f64 (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b)))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) 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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64)))))) (*.f64 a a)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64)))))) (*.f64 a a))) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64)))))) (*.f64 a a))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a))) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 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 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 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 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))))) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 (neg.f64 (*.f64 b b)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 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 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 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 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b))) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64)))))) (*.f64 a a)))
(-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)))
(-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 (neg.f64 (*.f64 b b)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
(-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a))
(+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b))
y-scale
(*.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (/.f64 #s(literal 1 binary64) y-scale))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) y-scale) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) y-scale) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) y-scale)) (*.f64 y-scale y-scale))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) y-scale) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) y-scale)) (*.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) y-scale) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) y-scale) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) y-scale)))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) y-scale) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) y-scale)) (*.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) y-scale) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) y-scale) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) y-scale)))
(/.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) y-scale) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) y-scale) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) y-scale)) (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) y-scale) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) y-scale)) (*.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) y-scale) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) y-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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) y-scale) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) y-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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) y-scale) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) y-scale)) (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) y-scale) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) y-scale)) (*.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) y-scale) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) y-scale)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) y-scale) (*.f64 y-scale (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) y-scale) (*.f64 y-scale (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b))) (*.f64 y-scale y-scale))
(/.f64 (neg.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)))) (neg.f64 (neg.f64 y-scale)))
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a))) (neg.f64 y-scale))
(/.f64 #s(literal 1 binary64) (/.f64 y-scale (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale)
(-.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) y-scale) (/.f64 (*.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64)))))) (*.f64 a a)) y-scale))
(-.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) y-scale) (/.f64 (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale))
(-.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) y-scale) (/.f64 (*.f64 (neg.f64 (*.f64 b b)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) y-scale))
(-.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) y-scale) (/.f64 (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b)) y-scale))
(+.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) y-scale) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) y-scale))
(+.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) y-scale) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) y-scale))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 a a) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 a a) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))
(*.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale) (/.f64 #s(literal 1 binary64) y-scale))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (neg.f64 (*.f64 y-scale y-scale))) (*.f64 (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b)) (neg.f64 (*.f64 y-scale y-scale)))) (*.f64 (*.f64 y-scale y-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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (neg.f64 (*.f64 y-scale y-scale)))) (*.f64 (neg.f64 (*.f64 y-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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (neg.f64 (*.f64 y-scale y-scale))) (*.f64 (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 y-scale y-scale) (neg.f64 (*.f64 y-scale y-scale))))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b)) (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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (neg.f64 (*.f64 y-scale y-scale)))) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale)))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b)) (*.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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (neg.f64 (*.f64 y-scale y-scale)))) (*.f64 (neg.f64 (*.f64 y-scale y-scale)) (*.f64 y-scale y-scale)))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 y-scale y-scale) (neg.f64 (*.f64 y-scale y-scale))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 y-scale y-scale))) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale)))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 a a) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 a a) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a a) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 (neg.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale)))) (neg.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale)))))) (+.f64 (*.f64 (*.f64 a a) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (neg.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 a a) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 a a) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 a a) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a a) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 a a) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale)))) (neg.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 (*.f64 a a) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (neg.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale))))))))
(/.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b))) (neg.f64 (*.f64 y-scale y-scale)))
(/.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a))) (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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (neg.f64 (*.f64 y-scale y-scale))) (*.f64 (neg.f64 (*.f64 y-scale y-scale)) (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b)))) (*.f64 (*.f64 y-scale y-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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) (*.f64 (neg.f64 (*.f64 y-scale y-scale)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b))) (*.f64 (neg.f64 (*.f64 y-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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (neg.f64 (*.f64 y-scale y-scale))) (*.f64 (*.f64 y-scale y-scale) (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b)))) (*.f64 (*.f64 y-scale y-scale) (neg.f64 (*.f64 y-scale y-scale))))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b)) (neg.f64 (*.f64 y-scale y-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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)))) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale)))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b)) (*.f64 y-scale y-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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a))) (*.f64 (neg.f64 (*.f64 y-scale y-scale)) (*.f64 y-scale y-scale)))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (neg.f64 (*.f64 y-scale y-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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)))) (*.f64 (*.f64 y-scale y-scale) (neg.f64 (*.f64 y-scale y-scale))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 y-scale y-scale)) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a))) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a))) #s(literal 1 binary64)) (*.f64 (neg.f64 y-scale) y-scale))
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) #s(literal 1 binary64)) (*.f64 y-scale y-scale))
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (*.f64 a a) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b))) (neg.f64 (*.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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 y-scale y-scale)) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 y-scale y-scale)))) (neg.f64 (*.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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 y-scale y-scale)) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b)))) (neg.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale))))
(/.f64 (neg.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale))) (neg.f64 (neg.f64 y-scale)))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a a) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b)) (*.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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 y-scale y-scale)) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 y-scale y-scale))) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale)))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a a) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 a a) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 a a) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 a a) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b)) (*.f64 (*.f64 y-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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 y-scale y-scale)) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b))) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale)))
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a))) (neg.f64 (*.f64 y-scale y-scale)))
(/.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale)) (neg.f64 y-scale))
(/.f64 #s(literal 1 binary64) (/.f64 y-scale (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale)))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))
(/.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale) y-scale)
(-.f64 (*.f64 (*.f64 a a) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (neg.f64 (*.f64 b b)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale)))
(-.f64 (*.f64 (*.f64 a a) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (/.f64 (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b)) (*.f64 y-scale y-scale)))
(-.f64 (*.f64 (*.f64 a a) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (neg.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale)))))
(-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64)))))) (*.f64 a a)) (*.f64 y-scale y-scale)))
(-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)))
(+.f64 (/.f64 (*.f64 (*.f64 (*.f64 a a) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (*.f64 y-scale y-scale)) (*.f64 y-scale y-scale)) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 y-scale y-scale)) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 y-scale y-scale)) (*.f64 (*.f64 y-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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 y-scale y-scale)) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b)) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale))))
(+.f64 (/.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) 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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) y-scale) y-scale))
(+.f64 (/.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) y-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) y-scale) y-scale))
(+.f64 (*.f64 (*.f64 a a) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale))))
(+.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 a a) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))
(*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a)
(*.f64 a (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))
(*.f64 (fabs.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a)) (fabs.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a)))
(*.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a)) (neg.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a)))
(*.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 1 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 1 binary64)) (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a))
(*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)
(*.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))))
(*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a))
(pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a)) #s(literal 2 binary64)))
(*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b)
(*.f64 b (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))
(*.f64 (fabs.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b)) (fabs.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b)))
(*.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b)) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b)))
(*.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b) #s(literal 1 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b) #s(literal 1 binary64)) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b))
(*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b)
(*.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 b b))
(*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))))
(*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b))
(pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b)) #s(literal 2 binary64)))
(*.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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64)))))))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b)))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))))) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b))) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64)))))))
(-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b))
x-scale
(*.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (/.f64 #s(literal 1 binary64) x-scale))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) x-scale)) (*.f64 x-scale x-scale))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a) x-scale) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) x-scale) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) x-scale))) (-.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) x-scale)))
(/.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) x-scale) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a) x-scale) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) x-scale) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) x-scale)) (*.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) x-scale)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a) x-scale) (*.f64 x-scale (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b))) (*.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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)))) (neg.f64 (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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (neg.f64 x-scale))
(/.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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) x-scale) (/.f64 (*.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) x-scale) (/.f64 (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64)))))) x-scale))
(-.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a) x-scale) (/.f64 (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b)) x-scale))
(+.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) x-scale) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) x-scale))
(*.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) x-scale) (/.f64 #s(literal 1 binary64) 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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) x-scale))) (neg.f64 (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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) x-scale)) (neg.f64 x-scale))
(/.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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) 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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)))) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)))
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) (neg.f64 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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) x-scale))) (neg.f64 x-scale))
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 x-scale x-scale))
(/.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (*.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale)))))
(/.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) 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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (*.f64 a a) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) 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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)))) (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)))
(/.f64 (-.f64 (*.f64 (+.f64 (*.f64 (*.f64 (*.f64 a a) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) 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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) x-scale))) (*.f64 (*.f64 y-scale y-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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 y-scale y-scale)) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 y-scale y-scale))) (neg.f64 x-scale)) (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) x-scale)))) (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 y-scale y-scale)) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 y-scale y-scale))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)))) (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 y-scale y-scale)) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 y-scale y-scale))) x-scale) (*.f64 (*.f64 (*.f64 y-scale y-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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) x-scale))) (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 y-scale y-scale)) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b))) (neg.f64 x-scale)) (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) x-scale)))) (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 y-scale y-scale)) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)))) (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 y-scale y-scale)) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b))) x-scale) (*.f64 (*.f64 (*.f64 y-scale y-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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) x-scale))) (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale)) x-scale))
(/.f64 (-.f64 (*.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) 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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) 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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) 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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)))) (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)))
(/.f64 (-.f64 (*.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) x-scale))) (*.f64 (*.f64 y-scale y-scale) x-scale))
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) 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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) x-scale)))) (*.f64 y-scale (neg.f64 x-scale)))
(/.f64 (neg.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) 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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) x-scale)))) (neg.f64 (*.f64 y-scale x-scale)))
(/.f64 (-.f64 (*.f64 (*.f64 x-scale x-scale) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale)) (*.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) y-scale)) (*.f64 (*.f64 x-scale x-scale) y-scale))
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) x-scale)) x-scale)
(/.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale))))
(/.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale))))))
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) 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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) x-scale))) (*.f64 y-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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))))
(-.f64 (/.f64 (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale)))
(-.f64 (/.f64 (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale) x-scale) (*.f64 y-scale x-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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) x-scale)) (*.f64 y-scale x-scale)))
(-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-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 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 (-.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 (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 b) (*.f64 a a)) #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) (-.f64 (*.f64 b b) (*.f64 a a)))
(/.f64 (-.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (-.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))
(/.f64 (+.f64 (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 3 binary64)) (pow.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 3 binary64))) (+.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (-.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))))
(+.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))
(*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))
(*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)))
(*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(*.f64 (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))
(*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (/.f64 #s(literal 1 binary64) x-scale))
(*.f64 (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (/.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale))
(/.f64 (neg.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (neg.f64 (neg.f64 x-scale)))
(/.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (neg.f64 x-scale))
(/.f64 #s(literal 1 binary64) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))
(/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) x-scale)
(*.f64 (/.f64 (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) x-scale) (/.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) y-scale))
(*.f64 (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) y-scale))
(*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (/.f64 (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) y-scale))
(*.f64 (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (/.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale)) (/.f64 #s(literal 1 binary64) y-scale))
(/.f64 (*.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 1 binary64)) (*.f64 (neg.f64 x-scale) y-scale))
(/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1 binary64)) (*.f64 x-scale y-scale))
(/.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (/.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale)))) (neg.f64 (neg.f64 y-scale)))
(/.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (/.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale))) (neg.f64 y-scale))
(/.f64 #s(literal 1 binary64) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (/.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale))))
(/.f64 (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (/.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale)) y-scale)
(/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))
(*.f64 (fabs.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))) (fabs.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))))
(*.f64 (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)))
(*.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (/.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) y-scale) #s(literal 2 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (neg.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))) (neg.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)))
(pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))
(/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (/.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale))) (neg.f64 (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (/.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale)))) (*.f64 y-scale y-scale))
(/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (/.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale))) (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (/.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale))) (*.f64 (neg.f64 y-scale) y-scale))
(/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (/.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale))) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (*.f64 (neg.f64 y-scale) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (/.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale)) (neg.f64 (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (/.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale)))) (*.f64 y-scale (neg.f64 y-scale)))
(/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (/.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale)) (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (/.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale))) (*.f64 y-scale y-scale))
(/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (/.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale)) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (neg.f64 (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (/.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale)))) (*.f64 (*.f64 x-scale y-scale) (neg.f64 y-scale)))
(/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (/.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale))) (*.f64 (*.f64 x-scale y-scale) y-scale))
(/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))) #s(literal 2 binary64)))
#s(literal 1/180 binary64)
(*.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 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))
(*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) 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 (PI.f64) angle) #s(literal 1/180 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(cos.f64 (neg.f64 (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(cos.f64 (fabs.f64 (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(cos.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))
(cos.f64 (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))
(cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(+.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(*.f64 (fabs.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (fabs.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(*.f64 (neg.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (neg.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 1 binary64)) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 1 binary64)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64))) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))
(pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))))))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (cos.f64 (-.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (cos.f64 (-.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (cos.f64 (-.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (cos.f64 (-.f64 (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (cos.f64 (-.f64 (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (cos.f64 (-.f64 (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (cos.f64 (-.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (cos.f64 (-.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) (cos.f64 (-.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (sin.f64 (+.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (sin.f64 (+.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (+.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))))))
(-.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(-.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(-.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64)))))
(-.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))))
(exp.f64 (*.f64 (log.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))
(+.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(*.f64 (fabs.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a)) (fabs.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a)))
(*.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a)) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a)))
(*.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 1 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 1 binary64)) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a))
(*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)
(*.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 a a))
(*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))))
(*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a))
(pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a)) #s(literal 2 binary64)))
(sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(*.f64 (fabs.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (fabs.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(*.f64 (neg.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (neg.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 1 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 1 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64))) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))
(pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))))))
(/.f64 (-.f64 (cos.f64 (-.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))))))
(neg.f64 (-.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64)))))
(+.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))))
(*.f64 (fabs.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b)) (fabs.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b)))
(*.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b)) (neg.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b)))
(*.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b) #s(literal 1 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b) #s(literal 1 binary64)) (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b))
(*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b)
(*.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))))
(*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b) (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b))
(pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b)) #s(literal 2 binary64)))
(*.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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64)))))) (*.f64 a a)))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64)))))) (*.f64 a a))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 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 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 (neg.f64 (*.f64 b b)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) #s(literal 2 binary64)) (*.f64 (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b)))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) 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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64)))))) (*.f64 a a)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64)))))) (*.f64 a a))) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64)))))) (*.f64 a a))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a))) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 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 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 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 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))))) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 (neg.f64 (*.f64 b b)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 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 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 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 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b))) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64)))))) (*.f64 a a)))
(-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)))
(-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 (neg.f64 (*.f64 b b)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
(-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a))
(+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b))
(*.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 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) y-scale) (/.f64 b y-scale))
(*.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) y-scale) (/.f64 (*.f64 b b) y-scale))
(*.f64 (/.f64 (*.f64 b b) y-scale) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) y-scale))
(*.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b) y-scale))
(*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))
(*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale)))
(/.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b))) (neg.f64 (neg.f64 (*.f64 y-scale y-scale))))
(/.f64 (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b)) (neg.f64 (*.f64 y-scale y-scale)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) y-scale) (/.f64 a y-scale))
(*.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) y-scale) (/.f64 (*.f64 a a) y-scale))
(*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) y-scale))
(*.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) y-scale) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) y-scale))
(*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))
(*.f64 (*.f64 a a) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))
(/.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a))) (neg.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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (neg.f64 (*.f64 y-scale 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)))
(/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 y-scale y-scale))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 a a) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 a a) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))
(*.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale) (/.f64 #s(literal 1 binary64) y-scale))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (neg.f64 (*.f64 y-scale y-scale))) (*.f64 (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b)) (neg.f64 (*.f64 y-scale y-scale)))) (*.f64 (*.f64 y-scale y-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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (neg.f64 (*.f64 y-scale y-scale)))) (*.f64 (neg.f64 (*.f64 y-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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (neg.f64 (*.f64 y-scale y-scale))) (*.f64 (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 y-scale y-scale) (neg.f64 (*.f64 y-scale y-scale))))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b)) (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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (neg.f64 (*.f64 y-scale y-scale)))) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale)))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b)) (*.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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (neg.f64 (*.f64 y-scale y-scale)))) (*.f64 (neg.f64 (*.f64 y-scale y-scale)) (*.f64 y-scale y-scale)))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 y-scale y-scale) (neg.f64 (*.f64 y-scale y-scale))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 y-scale y-scale))) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale)))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 a a) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 a a) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a a) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 (neg.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale)))) (neg.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale)))))) (+.f64 (*.f64 (*.f64 a a) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (neg.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 a a) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 a a) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 a a) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a a) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 a a) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale)))) (neg.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 (*.f64 a a) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (neg.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale))))))))
(/.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b))) (neg.f64 (*.f64 y-scale y-scale)))
(/.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a))) (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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (neg.f64 (*.f64 y-scale y-scale))) (*.f64 (neg.f64 (*.f64 y-scale y-scale)) (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b)))) (*.f64 (*.f64 y-scale y-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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) (*.f64 (neg.f64 (*.f64 y-scale y-scale)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b))) (*.f64 (neg.f64 (*.f64 y-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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (neg.f64 (*.f64 y-scale y-scale))) (*.f64 (*.f64 y-scale y-scale) (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b)))) (*.f64 (*.f64 y-scale y-scale) (neg.f64 (*.f64 y-scale y-scale))))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b)) (neg.f64 (*.f64 y-scale y-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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)))) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale)))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b)) (*.f64 y-scale y-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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a))) (*.f64 (neg.f64 (*.f64 y-scale y-scale)) (*.f64 y-scale y-scale)))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (neg.f64 (*.f64 y-scale y-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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)))) (*.f64 (*.f64 y-scale y-scale) (neg.f64 (*.f64 y-scale y-scale))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 y-scale y-scale)) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a))) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a))) #s(literal 1 binary64)) (*.f64 (neg.f64 y-scale) y-scale))
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) #s(literal 1 binary64)) (*.f64 y-scale y-scale))
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (*.f64 a a) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b))) (neg.f64 (*.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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 y-scale y-scale)) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 y-scale y-scale)))) (neg.f64 (*.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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 y-scale y-scale)) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b)))) (neg.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale))))
(/.f64 (neg.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale))) (neg.f64 (neg.f64 y-scale)))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a a) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b)) (*.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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 y-scale y-scale)) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 y-scale y-scale))) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale)))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a a) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 a a) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 a a) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 a a) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b)) (*.f64 (*.f64 y-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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 y-scale y-scale)) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b))) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale)))
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a))) (neg.f64 (*.f64 y-scale y-scale)))
(/.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale)) (neg.f64 y-scale))
(/.f64 #s(literal 1 binary64) (/.f64 y-scale (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale)))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))
(/.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale) y-scale)
(-.f64 (*.f64 (*.f64 a a) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (neg.f64 (*.f64 b b)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale)))
(-.f64 (*.f64 (*.f64 a a) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (/.f64 (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b)) (*.f64 y-scale y-scale)))
(-.f64 (*.f64 (*.f64 a a) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (neg.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale)))))
(-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64)))))) (*.f64 a a)) (*.f64 y-scale y-scale)))
(-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)))
(+.f64 (/.f64 (*.f64 (*.f64 (*.f64 a a) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (*.f64 y-scale y-scale)) (*.f64 y-scale y-scale)) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 y-scale y-scale)) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 y-scale y-scale)) (*.f64 (*.f64 y-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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 y-scale y-scale)) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b)) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale))))
(+.f64 (/.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) 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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) y-scale) y-scale))
(+.f64 (/.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) y-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) y-scale) y-scale))
(+.f64 (*.f64 (*.f64 a a) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale))))
(+.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 a a) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))
(*.f64 (fabs.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a)) (fabs.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a)))
(*.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a)) (neg.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a)))
(*.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 1 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 1 binary64)) (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a))
(*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)
(*.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))))
(*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a))
(pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a)) #s(literal 2 binary64)))
(*.f64 (fabs.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b)) (fabs.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b)))
(*.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b)) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b)))
(*.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b) #s(literal 1 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b) #s(literal 1 binary64)) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b))
(*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b)
(*.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 b b))
(*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))))
(*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b))
(pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b)) #s(literal 2 binary64)))
(*.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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64)))))))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b)))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))))) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b))) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64)))))))
(-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b))
(*.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)))
#s(literal 1/2 binary64)
#s(literal -1/2 binary64)
(*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))
(*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (-.f64 (*.f64 b b) (*.f64 a a)))
(*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (-.f64 (*.f64 b b) (*.f64 a a)))
(*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))
(*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.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) angle))
(/.f64 angle #s(literal 180 binary64))
(*.f64 (/.f64 (fabs.f64 a) y-scale) (/.f64 (fabs.f64 a) y-scale))
(*.f64 (/.f64 (neg.f64 a) y-scale) (/.f64 (neg.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 (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 (*.f64 y-scale y-scale) (*.f64 a a)))
(/.f64 (*.f64 a a) (*.f64 y-scale y-scale))
(*.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) (neg.f64 x-scale)) (/.f64 (neg.f64 b) (neg.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 (/.f64 b x-scale) (/.f64 b 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 (*.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 (*.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)) (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 x-scale) (*.f64 y-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 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 (*.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 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 (*.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 (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 x-scale) (*.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 x-scale) (*.f64 y-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 x-scale) (*.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 (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 x-scale) (*.f64 y-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 x-scale) (*.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 x-scale) (*.f64 y-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 x-scale) (*.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 (*.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 x-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 (*.f64 b b) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (*.f64 a a))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-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 x-scale) (*.f64 y-scale y-scale)) (*.f64 (*.f64 x-scale x-scale) (*.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 x-scale) (*.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 b b) (*.f64 a a)) (PI.f64))
(*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))
(log.f64 (pow.f64 (exp.f64 (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))))
(*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (PI.f64)) angle)
(*.f64 (*.f64 (PI.f64) angle) (-.f64 (*.f64 b b) (*.f64 a a)))
(*.f64 angle (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (PI.f64)))
(*.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 (/.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 (/.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 (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 (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b 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 y-scale y-scale) (*.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 (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b 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)))))
#s(literal 90 binary64)
(*.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)))))
(*.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))
(*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (-.f64 (*.f64 b b) (*.f64 a 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 b) (*.f64 a 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 b) (*.f64 a 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 b) (*.f64 a 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 b) (*.f64 a a)) (PI.f64))))
(*.f64 (/.f64 x-scale (*.f64 (-.f64 (*.f64 b b) (*.f64 a 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 b) (*.f64 a 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) (*.f64 (-.f64 (*.f64 b b) (*.f64 a 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 b) (*.f64 a 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))))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (PI.f64) angle) (-.f64 (*.f64 b b) (*.f64 a 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 b) (*.f64 a 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 b) (*.f64 a 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 b) (*.f64 a 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 b) (*.f64 a 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 b) (*.f64 a a)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) angle) (-.f64 (*.f64 b b) (*.f64 a 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 b) (*.f64 a a))))
(*.f64 (/.f64 #s(literal 90 binary64) (*.f64 (-.f64 (*.f64 b b) (*.f64 a 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 b) (*.f64 a 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 b) (*.f64 a a)) (PI.f64))))
(*.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 b) (*.f64 a 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 b) (*.f64 a 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 b) (*.f64 a 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 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 (*.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 b) (*.f64 a a)))) #s(literal 90 binary64)))
(*.f64 (pow.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) #s(literal 1 binary64)) (pow.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) #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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) #s(literal 1 binary64)) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)))
(*.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (/.f64 #s(literal 2 binary64) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (/.f64 #s(literal 2 binary64) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)))
(pow.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b)))) (+.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b))))) (*.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) #s(literal 2 binary64)))) (-.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b)))) (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b)))) #s(literal 3 binary64)) (pow.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) #s(literal 2 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b)))) (+.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) #s(literal 2 binary64))) (*.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b)))) (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) #s(literal 2 binary64))))))
(exp.f64 (*.f64 (log.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) #s(literal 2 binary64)))
(+.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b)))) (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) #s(literal 2 binary64)))
(*.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) #s(literal 1 binary64)) (pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) 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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) #s(literal 1 binary64)) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)))
(*.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) y-scale) #s(literal 2 binary64)))
(*.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))))
(*.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) 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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (fabs.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) (fabs.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))))
(*.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)))
(pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (*.f64 a a) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 y-scale y-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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b)) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale))))) (+.f64 (pow.f64 (*.f64 (*.f64 a a) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 y-scale y-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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b)) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale)))))) (*.f64 (pow.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (-.f64 (+.f64 (pow.f64 (*.f64 (*.f64 a a) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 y-scale y-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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b)) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (+.f64 (pow.f64 (*.f64 (*.f64 a a) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 y-scale y-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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b)) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale))))) #s(literal 3 binary64)) (pow.f64 (pow.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (*.f64 a a) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 y-scale y-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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b)) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale))))) (+.f64 (pow.f64 (*.f64 (*.f64 a a) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 y-scale y-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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b)) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale)))))) (-.f64 (*.f64 (pow.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 (+.f64 (pow.f64 (*.f64 (*.f64 a a) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 y-scale y-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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b)) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))
(/.f64 (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale)) (*.f64 y-scale y-scale))
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 (*.f64 a a) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b)) (+.f64 (*.f64 (*.f64 (*.f64 a a) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b))) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 (*.f64 a a) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b)) (+.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 y-scale y-scale)) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale))))
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 (*.f64 a a) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b)) (+.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 y-scale y-scale)) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b)))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale))))
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 (*.f64 a a) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b)) (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale))) (*.f64 (*.f64 y-scale y-scale) (neg.f64 y-scale)))
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 (*.f64 a a) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a))) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 (*.f64 a a) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b)) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale)) (*.f64 (*.f64 y-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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 y-scale y-scale)) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 y-scale y-scale))) (+.f64 (*.f64 (*.f64 (*.f64 a a) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b))) (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 y-scale y-scale)) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) 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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 y-scale y-scale)) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale)) (*.f64 (*.f64 y-scale y-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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 y-scale y-scale)) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) 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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 y-scale y-scale)) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b)))) (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale)) (*.f64 (*.f64 y-scale y-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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 y-scale y-scale)) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 y-scale y-scale))) (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale))) (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 y-scale y-scale)) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 y-scale y-scale))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a))) (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 y-scale y-scale)) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 y-scale y-scale))) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale)) (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 y-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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 y-scale y-scale)) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b))) (+.f64 (*.f64 (*.f64 (*.f64 a a) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b))) (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 y-scale y-scale)) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b))) (+.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 y-scale y-scale)) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale)) (*.f64 (*.f64 y-scale y-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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 y-scale y-scale)) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b))) (+.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 y-scale y-scale)) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b)))) (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale)) (*.f64 (*.f64 y-scale y-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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 y-scale y-scale)) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b))) (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale))) (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 y-scale y-scale)) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a))) (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 y-scale y-scale)) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b))) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale)) (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale)) y-scale))
(/.f64 (*.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale)) (+.f64 (*.f64 (*.f64 (*.f64 a a) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b))) (*.f64 (neg.f64 y-scale) (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale)) (+.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 y-scale y-scale)) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 y-scale y-scale)))) (*.f64 (neg.f64 y-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale))))
(/.f64 (*.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale)) (+.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 y-scale y-scale)) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b)))) (*.f64 (neg.f64 y-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale))))
(/.f64 (*.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale)) (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale))) (*.f64 y-scale y-scale))
(/.f64 (*.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale)) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a))) (*.f64 (neg.f64 y-scale) (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale)) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale)) (*.f64 (neg.f64 y-scale) y-scale))
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (+.f64 (*.f64 (*.f64 (*.f64 a a) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b))) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 y-scale y-scale)) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale))))
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 y-scale y-scale)) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b)))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale))))
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale))) (*.f64 (*.f64 y-scale y-scale) (neg.f64 y-scale)))
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale)) (*.f64 (*.f64 y-scale y-scale) y-scale))
(/.f64 (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale) (+.f64 (*.f64 (*.f64 (*.f64 a a) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b))) (*.f64 y-scale (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale) (+.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 y-scale y-scale)) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 y-scale y-scale)))) (*.f64 y-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale))))
(/.f64 (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale) (+.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 y-scale y-scale)) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b)))) (*.f64 y-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale))))
(/.f64 (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale) (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale))) (*.f64 y-scale (neg.f64 y-scale)))
(/.f64 (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a))) (*.f64 y-scale (*.f64 y-scale y-scale)))
(/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale)))
(exp.f64 (*.f64 (log.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))
(+.f64 (+.f64 (pow.f64 (*.f64 (*.f64 a a) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 y-scale y-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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b)) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))
(*.f64 (pow.f64 (pow.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) #s(literal 2 binary64)))
(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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b)))
(/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b)))))
(/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) y-scale)
(*.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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))))
(/.f64 (-.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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)))) (*.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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))))) (*.f64 (*.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) y-scale) (*.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) y-scale))) (-.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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) 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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) 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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) y-scale)) (*.f64 (*.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) y-scale) (*.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) y-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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) y-scale) (*.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) y-scale)))
(/.f64 (+.f64 (pow.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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)))) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) y-scale) #s(literal 3 binary64))) (+.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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)))) (*.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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))))) (-.f64 (*.f64 (*.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) y-scale) (*.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) y-scale)) (*.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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) y-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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) 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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) y-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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) 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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) y-scale)) (-.f64 (*.f64 (*.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) y-scale) (*.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) y-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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) y-scale) (*.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) y-scale)))))
(+.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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) y-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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) y-scale) (*.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) y-scale))
(*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(*.f64 (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) x-scale)
(*.f64 x-scale (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (/.f64 y-scale (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(*.f64 (/.f64 y-scale (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale) (/.f64 y-scale (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(*.f64 (/.f64 y-scale (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (/.f64 y-scale x-scale))
(*.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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) y-scale) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))
(*.f64 y-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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))
(/.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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) y-scale) x-scale)) (neg.f64 (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(/.f64 (neg.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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) y-scale))) (neg.f64 (neg.f64 (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) y-scale) x-scale) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(/.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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) y-scale)) (neg.f64 (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) y-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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(+.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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (/.f64 (*.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (/.f64 (*.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))
(*.f64 (/.f64 #s(literal -1/2 binary64) (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) y-scale) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(*.f64 (/.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) y-scale) x-scale))
(*.f64 (/.f64 #s(literal -1/2 binary64) 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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) y-scale) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(*.f64 (*.f64 y-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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))
(*.f64 #s(literal -1/2 binary64) (*.f64 y-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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))))
(/.f64 (neg.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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) y-scale))) (neg.f64 (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))
(/.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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) y-scale)) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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 y-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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))
(*.f64 (pow.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(*.f64 (sqrt.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) (sqrt.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))))
(*.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) #s(literal 1/2 binary64)) (pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) #s(literal 1/2 binary64)))
(pow.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 1/2 binary64))
(sqrt.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) #s(literal 2 binary64)))
(fabs.f64 (neg.f64 (fabs.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)))))
(fabs.f64 (fabs.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))))
(fabs.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)))
(exp.f64 (*.f64 (log.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)))) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a a) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale))) (fabs.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)))) (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale))) (fabs.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)))))) (-.f64 (*.f64 (*.f64 a a) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale))) (fabs.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (*.f64 (neg.f64 (fabs.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)))) (neg.f64 (fabs.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) (neg.f64 (fabs.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (+.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) (fabs.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 a a) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) #s(literal 3 binary64)) (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale))) (fabs.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 a a) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (-.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale))) (fabs.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)))) (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale))) (fabs.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 (*.f64 a a) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale))) (fabs.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))))))))
(/.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) #s(literal 3 binary64)) (pow.f64 (neg.f64 (fabs.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) 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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (-.f64 (*.f64 (neg.f64 (fabs.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)))) (neg.f64 (fabs.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) (neg.f64 (fabs.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) #s(literal 3 binary64)) (pow.f64 (fabs.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) 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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) 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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) (fabs.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)))))))
(neg.f64 (-.f64 (fabs.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))))
(-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) (fabs.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))))
(+.f64 (*.f64 (*.f64 a a) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale))) (fabs.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)))))
(+.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) (neg.f64 (fabs.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)))))
(*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) (fabs.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)))) y-scale)
(*.f64 y-scale (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) (fabs.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)))))
(*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) (fabs.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)))))
(*.f64 (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) (fabs.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)))) y-scale) x-scale)
(*.f64 x-scale (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) (fabs.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)))) y-scale))
(*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (/.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) (fabs.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)))) (-.f64 (*.f64 b b) (*.f64 a a))))
(*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (/.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) (fabs.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(*.f64 (/.f64 (*.f64 x-scale y-scale) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (/.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) (fabs.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(*.f64 (/.f64 (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) (fabs.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)))) y-scale) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (/.f64 x-scale (-.f64 (*.f64 b b) (*.f64 a a))))
(*.f64 (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (/.f64 (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) (fabs.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)))) y-scale) (-.f64 (*.f64 b b) (*.f64 a a))))
(*.f64 (/.f64 (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) (fabs.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)))) y-scale) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (/.f64 x-scale (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(*.f64 (/.f64 x-scale (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (/.f64 (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) (fabs.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)))) y-scale) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(*.f64 (/.f64 (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) (fabs.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)))) y-scale) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(*.f64 (/.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (/.f64 (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) (fabs.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)))) y-scale) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(*.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) (fabs.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) (fabs.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)))) y-scale) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(/.f64 (neg.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) (fabs.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (neg.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) (fabs.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))))))) (neg.f64 (neg.f64 (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))
(/.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) (fabs.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(/.f64 (neg.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) (fabs.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)))))) (neg.f64 (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) (fabs.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)))))))
(/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) (fabs.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(*.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) (fabs.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))))) (-.f64 (*.f64 b b) (*.f64 a a))))
(*.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) (fabs.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(*.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) (fabs.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) (fabs.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) (fabs.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(/.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) (fabs.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))))))) (neg.f64 (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) (fabs.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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 (*.f64 x-scale y-scale) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) (fabs.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) #s(literal 1 binary64)) (pow.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) #s(literal 1 binary64)) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)))
(*.f64 (pow.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a))) (neg.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a))))
(*.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a))) (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a))))
(*.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)))
(pow.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) #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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b)))) (+.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) #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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) #s(literal 2 binary64)))) (-.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) #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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) #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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b)))) #s(literal 3 binary64)) (pow.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) #s(literal 2 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) #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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b)))) (+.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) #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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) #s(literal 2 binary64))) (*.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) #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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) #s(literal 2 binary64))))))
(exp.f64 (*.f64 (log.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a))) #s(literal 2 binary64)))
(+.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) #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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) #s(literal 2 binary64)))
(*.f64 (pow.f64 (pow.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 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 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 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 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a))) (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a))))
(*.f64 (pow.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 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 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 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 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 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 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) #s(literal 2 binary64)))
(fabs.f64 (neg.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)))))
(fabs.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a))))
(fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 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 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)))
(/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) #s(literal 2 binary64)) (*.f64 (neg.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)))) (neg.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)))))) (-.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (neg.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)))) (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)))))) (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a))))))
(/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) #s(literal 2 binary64))) (+.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)))))
(/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) #s(literal 3 binary64)) (pow.f64 (neg.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 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 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) #s(literal 2 binary64)) (-.f64 (*.f64 (neg.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)))) (neg.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a))))) (*.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (neg.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) #s(literal 3 binary64)) (pow.f64 (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) #s(literal 2 binary64)) (-.f64 (*.f64 (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)))) (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a))))) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a))))))))
(/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 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 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 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 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 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 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)))))))
(neg.f64 (-.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a))))
(-.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a))))
(+.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (neg.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)))))
(+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)))))
(*.f64 (-.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) (*.f64 y-scale y-scale)) (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)))) (*.f64 y-scale y-scale))
(/.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (*.f64 (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a))) (*.f64 y-scale y-scale)) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a))) (*.f64 y-scale y-scale))))
(/.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) #s(literal 3 binary64)) (pow.f64 (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) 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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (+.f64 (*.f64 (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a))) (*.f64 y-scale y-scale)) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a))) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a))) (*.f64 y-scale y-scale))))))
(/.f64 (-.f64 (+.f64 (*.f64 (*.f64 (*.f64 a a) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b)) (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)))) (*.f64 y-scale y-scale))
(/.f64 (-.f64 (*.f64 (+.f64 (*.f64 (*.f64 (*.f64 a a) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b)) (*.f64 y-scale y-scale)) (*.f64 (*.f64 y-scale y-scale) (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a))))) (*.f64 (*.f64 y-scale 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 y-scale y-scale)) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 y-scale y-scale))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale)) (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a))))) (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 y-scale y-scale)) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale)) (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a))))) (*.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale)) (*.f64 y-scale y-scale)))
(/.f64 (-.f64 (*.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale)) (*.f64 y-scale y-scale)) (*.f64 (neg.f64 y-scale) (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a))))) (*.f64 (neg.f64 y-scale) (*.f64 y-scale y-scale)))
(/.f64 (-.f64 (*.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) (*.f64 (*.f64 y-scale y-scale) (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale)))
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale) (*.f64 y-scale y-scale)) (*.f64 y-scale (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a))))) (*.f64 y-scale (*.f64 y-scale y-scale)))
(/.f64 (neg.f64 (neg.f64 (-.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)))))) (neg.f64 (neg.f64 (*.f64 y-scale y-scale))))
(/.f64 (neg.f64 (-.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a))))) (neg.f64 (*.f64 y-scale y-scale)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 y-scale y-scale) (-.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a))))))
(/.f64 (-.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)))) (*.f64 y-scale y-scale))
(-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a))) (*.f64 y-scale y-scale)))
(+.f64 (*.f64 (*.f64 a a) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)))) (*.f64 y-scale y-scale)))
(+.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) (/.f64 (neg.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)))) (*.f64 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)))) (/.f64 (-.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)))) (*.f64 y-scale y-scale)))
(*.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 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))
(*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) 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) (PI.f64)) (*.f64 #s(literal 1/180 binary64) angle))
(*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(/.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 180 binary64)) (*.f64 (*.f64 (PI.f64) angle) #s(literal 180 binary64))) #s(literal 32400 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (-.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (-.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(/.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 (PI.f64) angle) #s(literal 1/180 binary64)) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64)))))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))))))
(sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (fabs.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))))
(cos.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64)))))
(cos.f64 (neg.f64 (fabs.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64)))))
(cos.f64 (fabs.f64 (fabs.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64)))))
(cos.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))
(cos.f64 (fabs.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))
(cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64)))
(+.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))
(*.f64 (fabs.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (fabs.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(*.f64 (neg.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (neg.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 1 binary64)) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 1 binary64)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64))) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))
(pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))))))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (cos.f64 (-.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (cos.f64 (-.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (cos.f64 (-.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (cos.f64 (-.f64 (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (cos.f64 (-.f64 (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (cos.f64 (-.f64 (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (cos.f64 (-.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (cos.f64 (-.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) (cos.f64 (-.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (sin.f64 (+.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (sin.f64 (+.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (+.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))))))
(-.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(-.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(-.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64)))))
(-.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))))
(exp.f64 (*.f64 (log.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))
(+.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/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 (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 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a)) (fabs.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a)))
(*.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a)) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a)))
(*.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 1 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 1 binary64)) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a))
(*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)
(*.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 a a))
(*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))))
(*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a))
(pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a)) #s(literal 2 binary64)))
(*.f64 (fabs.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (fabs.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(*.f64 (neg.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (neg.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 1 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 1 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64))) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))
(pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))))))
(/.f64 (-.f64 (cos.f64 (-.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))))))
(neg.f64 (-.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64)))))
(+.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/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 (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 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b)) (fabs.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b)))
(*.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b)) (neg.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b)))
(*.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b) #s(literal 1 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b) #s(literal 1 binary64)) (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b))
(*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b)
(*.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))))
(*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b) (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b))
(pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b)) #s(literal 2 binary64)))
(*.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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64)))))) (*.f64 a a)))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64)))))) (*.f64 a a))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 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 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 (neg.f64 (*.f64 b b)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) #s(literal 2 binary64)) (*.f64 (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b)))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) 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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64)))))) (*.f64 a a)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64)))))) (*.f64 a a))) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64)))))) (*.f64 a a))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a))) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 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 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 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 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))))) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 (neg.f64 (*.f64 b b)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 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 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 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 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b))) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64)))))) (*.f64 a a)))
(-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)))
(-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 (neg.f64 (*.f64 b b)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
(-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a))
(+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b))
(*.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (/.f64 #s(literal 1 binary64) y-scale))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) y-scale) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) y-scale) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) y-scale)) (*.f64 y-scale y-scale))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) y-scale) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) y-scale)) (*.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) y-scale) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) y-scale) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) y-scale)))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) y-scale) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) y-scale)) (*.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) y-scale) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) y-scale) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) y-scale)))
(/.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) y-scale) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) y-scale) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) y-scale)) (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) y-scale) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) y-scale)) (*.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) y-scale) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) y-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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) y-scale) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) y-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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) y-scale) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) y-scale)) (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) y-scale) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) y-scale)) (*.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) y-scale) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) y-scale)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) y-scale) (*.f64 y-scale (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) y-scale) (*.f64 y-scale (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b))) (*.f64 y-scale y-scale))
(/.f64 (neg.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)))) (neg.f64 (neg.f64 y-scale)))
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a))) (neg.f64 y-scale))
(/.f64 #s(literal 1 binary64) (/.f64 y-scale (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale)
(-.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) y-scale) (/.f64 (*.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64)))))) (*.f64 a a)) y-scale))
(-.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) y-scale) (/.f64 (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale))
(-.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) y-scale) (/.f64 (*.f64 (neg.f64 (*.f64 b b)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) y-scale))
(-.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) y-scale) (/.f64 (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b)) y-scale))
(+.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) y-scale) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) y-scale))
(+.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) y-scale) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) y-scale))
(*.f64 (fabs.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a)) (fabs.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a)))
(*.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a)) (neg.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a)))
(*.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 1 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 1 binary64)) (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a))
(*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)
(*.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))))
(*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a))
(pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a)) #s(literal 2 binary64)))
(*.f64 (fabs.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b)) (fabs.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b)))
(*.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b)) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b)))
(*.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b) #s(literal 1 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b) #s(literal 1 binary64)) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b))
(*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b)
(*.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 b b))
(*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))))
(*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b))
(pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b)) #s(literal 2 binary64)))
(*.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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64)))))))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b)))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))))) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b))) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64)))))))
(-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b))
(*.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 x-scale x-scale) y-scale)
(*.f64 x-scale (*.f64 x-scale y-scale))
(*.f64 y-scale (*.f64 x-scale x-scale))
(*.f64 (*.f64 x-scale x-scale) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale))
(*.f64 x-scale (*.f64 x-scale (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale)))
(*.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale) (*.f64 x-scale x-scale))
(/.f64 (neg.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)))) (neg.f64 y-scale))
(/.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a))) y-scale)
(*.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) y-scale)
(*.f64 y-scale (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale)) (*.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) y-scale))) (*.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) y-scale))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) y-scale) y-scale) (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)))) y-scale)
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) y-scale) (*.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) y-scale)) (*.f64 (*.f64 (neg.f64 (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale)) (*.f64 (neg.f64 (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale)))) (-.f64 (*.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) y-scale) (*.f64 (neg.f64 (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale))))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) y-scale) (*.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) y-scale)) (*.f64 (neg.f64 (*.f64 (*.f64 x-scale x-scale) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale))))) (-.f64 (*.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) y-scale) (neg.f64 (*.f64 (*.f64 x-scale x-scale) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) y-scale) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) y-scale) (*.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) y-scale)) (-.f64 (*.f64 (*.f64 (neg.f64 (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale)) (*.f64 (neg.f64 (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale))) (*.f64 (*.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) y-scale) (*.f64 (neg.f64 (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) y-scale) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (*.f64 x-scale x-scale) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) y-scale) (*.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) y-scale)) (-.f64 (*.f64 (neg.f64 (*.f64 (*.f64 x-scale x-scale) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale)))) (*.f64 (*.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) y-scale) (neg.f64 (*.f64 (*.f64 x-scale x-scale) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) y-scale) (*.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) y-scale)) (*.f64 (*.f64 (*.f64 x-scale x-scale) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale)) (*.f64 (*.f64 x-scale x-scale) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale)))) (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) y-scale) (*.f64 (*.f64 x-scale x-scale) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) y-scale) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 x-scale x-scale) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) y-scale) (*.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) y-scale)) (+.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale)) (*.f64 (*.f64 x-scale x-scale) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale))) (*.f64 (*.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) y-scale) (*.f64 (*.f64 x-scale x-scale) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale))))))
(neg.f64 (-.f64 (*.f64 (*.f64 x-scale x-scale) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale)) (*.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) y-scale)))
(-.f64 (*.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) y-scale) (*.f64 (*.f64 x-scale x-scale) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale)))
(+.f64 (*.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) y-scale) (*.f64 (neg.f64 (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale)))
(+.f64 (*.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) y-scale) (neg.f64 (*.f64 (*.f64 x-scale x-scale) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) y-scale) (*.f64 (*.f64 x-scale x-scale) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (+.f64 (*.f64 (*.f64 (*.f64 a a) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b))) (*.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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 y-scale y-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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 y-scale y-scale)) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 y-scale 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 y-scale y-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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 y-scale y-scale)) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b)))) (*.f64 (*.f64 y-scale 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale)) (neg.f64 y-scale)) (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a))) (*.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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) y-scale) (*.f64 (*.f64 x-scale x-scale) y-scale)) (*.f64 (*.f64 x-scale x-scale) y-scale)) (*.f64 (*.f64 x-scale x-scale) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale))) (*.f64 (*.f64 x-scale 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) y-scale) (*.f64 (*.f64 x-scale x-scale) y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) y-scale) (*.f64 (*.f64 x-scale x-scale) y-scale)) (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (-.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) y-scale) (*.f64 (*.f64 x-scale x-scale) y-scale)) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) y-scale) (*.f64 (*.f64 x-scale x-scale) y-scale))) (+.f64 (*.f64 (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) y-scale) (*.f64 (*.f64 x-scale x-scale) y-scale)) (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)))))))
(/.f64 (-.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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) x-scale)) (*.f64 y-scale y-scale)) (*.f64 (neg.f64 x-scale) (+.f64 (*.f64 (*.f64 (*.f64 a a) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b)))) (*.f64 (neg.f64 x-scale) (*.f64 y-scale y-scale)))
(/.f64 (-.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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) x-scale)) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 y-scale y-scale)) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 y-scale y-scale))))) (*.f64 (neg.f64 x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale))))
(/.f64 (-.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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) x-scale)) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 y-scale y-scale)) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b))))) (*.f64 (neg.f64 x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale))))
(/.f64 (-.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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) x-scale)) (neg.f64 y-scale)) (*.f64 (neg.f64 x-scale) (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale)))) (*.f64 (neg.f64 x-scale) (neg.f64 y-scale)))
(/.f64 (-.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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) x-scale)) (*.f64 y-scale y-scale)) (*.f64 (neg.f64 x-scale) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)))) (*.f64 (neg.f64 x-scale) (*.f64 y-scale y-scale)))
(/.f64 (-.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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) x-scale)) y-scale) (*.f64 (neg.f64 x-scale) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 y-scale y-scale)) (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 (*.f64 (*.f64 a a) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b)))) (*.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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 y-scale y-scale)) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale y-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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 y-scale y-scale)) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale y-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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (neg.f64 y-scale)) (*.f64 (*.f64 x-scale x-scale) (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 y-scale y-scale)) (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)))) (*.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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) x-scale) (*.f64 y-scale y-scale)) (*.f64 x-scale (+.f64 (*.f64 (*.f64 (*.f64 a a) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b)))) (*.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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 y-scale y-scale)) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 y-scale y-scale))))) (*.f64 x-scale (*.f64 (*.f64 y-scale 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a) (*.f64 y-scale y-scale)) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b))))) (*.f64 x-scale (*.f64 (*.f64 y-scale 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) x-scale) (neg.f64 y-scale)) (*.f64 x-scale (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) x-scale) (*.f64 y-scale y-scale)) (*.f64 x-scale (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)))) (*.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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) y-scale) (*.f64 (*.f64 x-scale x-scale) y-scale)) (*.f64 (*.f64 (*.f64 x-scale x-scale) y-scale) (*.f64 (*.f64 x-scale x-scale) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale)))) (*.f64 (*.f64 (*.f64 x-scale x-scale) y-scale) (*.f64 (*.f64 x-scale 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) y-scale) (*.f64 (*.f64 x-scale x-scale) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale))) (*.f64 x-scale x-scale))) (neg.f64 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) y-scale) (*.f64 (*.f64 x-scale x-scale) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale))))) (neg.f64 (neg.f64 (*.f64 (*.f64 x-scale 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale)) y-scale) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) x-scale) y-scale) (*.f64 x-scale (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale)))) (neg.f64 (*.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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) y-scale) (*.f64 (*.f64 x-scale x-scale) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale))) (*.f64 x-scale 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale)) y-scale) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale)) #s(literal 3 binary64)) (pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (+.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a))) (*.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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) x-scale) y-scale) (*.f64 x-scale (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) y-scale) (*.f64 (*.f64 x-scale x-scale) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale)))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) y-scale) (*.f64 (*.f64 x-scale x-scale) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale)))))
(/.f64 (-.f64 (*.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) y-scale) (*.f64 (*.f64 x-scale x-scale) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale))) (*.f64 (*.f64 x-scale x-scale) y-scale))
(neg.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale)) y-scale) y-scale) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) x-scale) y-scale) (*.f64 x-scale y-scale)) (/.f64 (*.f64 x-scale (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) y-scale) (*.f64 (*.f64 x-scale x-scale) y-scale)) (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) y-scale) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.f64 (*.f64 (neg.f64 (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) y-scale) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.f64 (neg.f64 (*.f64 (*.f64 x-scale x-scale) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))))
(*.f64 (fabs.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)))) (fabs.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 1 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) y-scale) (*.f64 (*.f64 x-scale x-scale) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale x-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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) (/.f64 #s(literal 2 binary64) #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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))))
(*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale))))
(pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a))) (*.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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a))) (*.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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) #s(literal 3 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 3 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a))) (*.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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (-.f64 (*.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) y-scale) (*.f64 (*.f64 x-scale x-scale) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) y-scale) (*.f64 (*.f64 x-scale x-scale) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale))) (*.f64 x-scale x-scale))) (*.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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) y-scale) (*.f64 (*.f64 x-scale x-scale) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale))) (*.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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) y-scale) (*.f64 (*.f64 x-scale x-scale) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale))))) (*.f64 y-scale (neg.f64 (*.f64 (*.f64 x-scale 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) y-scale) (*.f64 (*.f64 x-scale x-scale) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) y-scale) (*.f64 (*.f64 x-scale x-scale) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale)))) (*.f64 y-scale (*.f64 (*.f64 x-scale x-scale) y-scale)))
(/.f64 (*.f64 (neg.f64 (-.f64 (*.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) y-scale) (*.f64 (*.f64 x-scale x-scale) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale)))) (/.f64 (-.f64 (*.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) y-scale) (*.f64 (*.f64 x-scale x-scale) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale))) (*.f64 x-scale x-scale))) (*.f64 (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)) y-scale))
(/.f64 (*.f64 (neg.f64 (-.f64 (*.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) y-scale) (*.f64 (*.f64 x-scale x-scale) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) 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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) y-scale) (*.f64 (*.f64 x-scale x-scale) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale))))) (*.f64 (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale))))
(/.f64 (*.f64 (neg.f64 (-.f64 (*.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) y-scale) (*.f64 (*.f64 x-scale x-scale) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale)))) (-.f64 (*.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) y-scale) (*.f64 (*.f64 x-scale x-scale) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale)))) (*.f64 (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)) (*.f64 (*.f64 x-scale 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) y-scale) (*.f64 (*.f64 x-scale x-scale) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale))) (/.f64 (-.f64 (*.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) y-scale) (*.f64 (*.f64 x-scale x-scale) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 (*.f64 x-scale 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) y-scale) (*.f64 (*.f64 x-scale x-scale) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) 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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) y-scale) (*.f64 (*.f64 x-scale x-scale) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale))))) (*.f64 (*.f64 (*.f64 x-scale x-scale) y-scale) (neg.f64 (*.f64 (*.f64 x-scale 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) y-scale) (*.f64 (*.f64 x-scale x-scale) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale))) (-.f64 (*.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) y-scale) (*.f64 (*.f64 x-scale x-scale) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale)))) (*.f64 (*.f64 (*.f64 x-scale x-scale) y-scale) (*.f64 (*.f64 x-scale 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale)) y-scale) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale)) (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale)) y-scale) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale))) (*.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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale)) y-scale) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale)) (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) x-scale) y-scale) (*.f64 x-scale (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale)))) (*.f64 y-scale (*.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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) x-scale) y-scale) (*.f64 x-scale (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale))) (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale)) y-scale) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale))) (*.f64 (*.f64 x-scale 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) x-scale) y-scale) (*.f64 x-scale (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale))) (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) x-scale) y-scale) (*.f64 x-scale (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) y-scale)))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))
(exp.f64 (*.f64 (log.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) #s(literal 2 binary64)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 (neg.f64 (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))) (neg.f64 (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (neg.f64 (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))) (-.f64 (*.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (neg.f64 (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (*.f64 (neg.f64 (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))) (neg.f64 (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (neg.f64 (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (-.f64 (*.f64 (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (neg.f64 (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(+.f64 (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))
(*.f64 (pow.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-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 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-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 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))) #s(literal 1/2 binary64))
(sqrt.f64 (*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))))))
(sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))))
(fabs.f64 (neg.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))))))
(fabs.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))))
(exp.f64 (*.f64 (log.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale))))
(/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))))) (neg.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))))))) (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale))) (neg.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))))))) (+.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))))))
(/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale))) #s(literal 3 binary64)) (pow.f64 (neg.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (-.f64 (*.f64 (neg.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))))) (neg.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))))) (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale))) (neg.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) #s(literal 3 binary64)) (pow.f64 (+.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))))) (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))))))))
(/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))))) (+.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (+.f64 (*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))))) (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))))))))
(neg.f64 (-.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale)))))
(-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))))
(-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))))))
(+.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale))) (neg.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))))))
(*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (/.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale))) y-scale)
(*.f64 (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))))
(/.f64 (-.f64 (*.f64 (/.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))))) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)))
(/.f64 (-.f64 (*.f64 (/.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))) (/.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))) (/.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))))) (+.f64 (/.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))) (/.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)))))
(/.f64 (-.f64 (pow.f64 (/.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))) #s(literal 3 binary64)) (pow.f64 (/.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))) (/.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)))) (+.f64 (*.f64 (/.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))) (/.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))) (/.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)))))))
(/.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))) (*.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))))) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(/.f64 (neg.f64 (neg.f64 (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))))))) (neg.f64 (neg.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)))))
(/.f64 (neg.f64 (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))))) (neg.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))))))
(/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))))) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)))
(-.f64 (/.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))))) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))))
(-.f64 (/.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))) (/.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))))
(+.f64 (/.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))) (/.f64 (neg.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))))) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))))
(atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))))) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))))
(*.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))))) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)))) (/.f64 #s(literal 1 binary64) (PI.f64)))
(/.f64 (neg.f64 (neg.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))))) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)))))) (neg.f64 (neg.f64 (PI.f64))))
(/.f64 (neg.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))))) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))))) (neg.f64 (PI.f64)))
(/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))))) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))))))
(/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))))) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)))) (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 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))))) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)))) (cbrt.f64 (PI.f64))))
(*.f64 (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))))) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)))) (PI.f64)) #s(literal 180 binary64))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))))) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)))) (PI.f64)))
(/.f64 (neg.f64 (*.f64 #s(literal 180 binary64) (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))))) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)))))) (neg.f64 (PI.f64)))
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) 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 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))))) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale 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)) (*.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 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 (*.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 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 (*.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 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 (*.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 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 (*.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 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 (*.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 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 (*.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 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 (*.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 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 (*.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 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 (*.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 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 (*.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 b) (*.f64 a a)))) #s(literal 90 binary64))))) (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 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #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 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #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 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #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 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #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 y-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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #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 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #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 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #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 y-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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #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 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #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 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #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 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))))) (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 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) (fabs.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #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 x-scale y-scale) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) (fabs.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #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 x-scale y-scale) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) (fabs.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #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 x-scale y-scale) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) (fabs.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #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 x-scale y-scale) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) (fabs.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #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 x-scale y-scale) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) (fabs.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #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 x-scale y-scale) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) (fabs.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #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 x-scale y-scale) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) (fabs.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #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 x-scale y-scale) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) (fabs.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #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 x-scale y-scale) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) (fabs.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #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 x-scale y-scale) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale)) (fabs.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))))) (PI.f64))
(*.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 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (/.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale))) y-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 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)))) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))))
(/.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 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)))) (*.f64 y-scale y-scale))))) (neg.f64 (neg.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.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 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)))) (*.f64 y-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-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)))) (/.f64 (-.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)))) (*.f64 y-scale y-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 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.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 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.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 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)))) (/.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 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)))))) (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 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))))) (neg.f64 (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 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.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 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)))) (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 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)))) (cbrt.f64 (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 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)))) (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 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)))) (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 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)))))) (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 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)) (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) a) a)))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale))))) (PI.f64))

eval291.0ms (2.7%)

Memory
21.5MiB live, 246.4MiB allocated; 47ms collecting garbage
Compiler

Compiled 532 686 to 28 124 computations (94.7% saved)

prune75.0ms (0.7%)

Memory
-4.5MiB live, 81.3MiB allocated; 4ms collecting garbage
Pruning

40 alts after pruning (40 fresh and 0 done)

PrunedKeptTotal
New2 599392 638
Fresh21122
Picked505
Done101
Total2 626402 666
Accuracy
72.7%
Counts
2 666 → 40
Alt Table
Click to see full alt table
StatusAccuracyProgram
8.9%
(/.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 b) (*.f64 a a)))) #s(literal 90 binary64))))) (PI.f64))
26.5%
(*.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 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) (PI.f64)) #s(literal 180 binary64))
26.2%
(*.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 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) (cbrt.f64 (PI.f64))))
6.5%
(*.f64 #s(approx 180 #s(literal 0 binary64)) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow 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)))
7.8%
(*.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)))
1.6%
(*.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 (-.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 a a) (*.f64 a a))) (+.f64 (*.f64 b b) (*.f64 a a)))) (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)))
1.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 (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #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 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) 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))))))) y-scale))) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (/.f64 (pow.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))))))) 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))))))) y-scale)) #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)))))) (*.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)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.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 (pow.f64 b #s(literal 2 binary64)) (+.f64 #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 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) 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))))))) y-scale))) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (/.f64 (pow.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))))))) 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))))))) y-scale)) #s(literal 2 binary64)) (pow.f64 y-scale #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 (/.f64 (pow.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))))))) 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))))))) y-scale)) #s(literal 2 binary64)) (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/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 (/.f64 (pow.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))))))) 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))))))) y-scale)) #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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))))) (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 (*.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 b) (*.f64 a a)))))) (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 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) y-scale)) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)))
10.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 (/.f64 #s(literal 90 binary64) (*.f64 (-.f64 (*.f64 b b) (*.f64 a 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)))
27.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 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) y-scale) x-scale)))) (PI.f64)))
26.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 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) y-scale) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)))
2.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 (*.f64 y-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 y-scale y-scale) (*.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)))
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)) (*.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)))
20.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 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)))
6.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 #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)) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (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 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)))
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 (/.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 b) (*.f64 a a))))))) (PI.f64)))
9.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 (/.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 b) (*.f64 a a)))))))) (PI.f64)))
4.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 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)))
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 1/2 binary64) #s(approx (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))) (/.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))) (sqrt.f64 (/.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 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)))))))))) (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 -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 (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (+.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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)) (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (+.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (PI.f64)))
20.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)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (/.f64 (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)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (/.f64 (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)))
20.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 (*.f64 b b) (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 (*.f64 b b) (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 b b) (pow.f64 a #s(literal 2 binary64)))))))))) (PI.f64)))
18.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 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 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)))))) (*.f64 (pow.f64 b #s(literal 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)) #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)))))) (*.f64 (pow.f64 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.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 #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 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)))
19.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 #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)))
22.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 #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))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 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.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 (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)))
24.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 #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)))))) (*.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)))
16.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 #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)))
39.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 #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.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 (*.f64 (pow.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)))
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)) #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)))
8.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 (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (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)))
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)) #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.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 (* -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)))
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 (* -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)))))))))))) (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)) #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)))
26.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)) (*.f64 (*.f64 y-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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))))))
Compiler

Compiled 6 482 to 1 046 computations (83.9% saved)

series399.0ms (3.7%)

Memory
-3.6MiB live, 290.3MiB allocated; 39ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
04594134532
Stop Event
iter-limit
Counts
115 → 647
Calls
Call 1
Inputs
#s(literal 180 binary64)
a
angle
(PI.f64)
#s(literal 2 binary64)
b
y-scale
x-scale
(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)))
#s(literal 1/180 binary64)
(*.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))))
(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))))
(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)))
(*.f64 (pow.f64 b #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))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))
#s(literal 4 binary64)
#s(literal 1/2 binary64)
#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))))
(*.f64 (cos.f64 (*.f64 #s(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)))))
(pow.f64 a #s(literal 4 binary64))
#s(literal 1 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)))))
#s(literal 90 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 (PI.f64) angle)
(*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))
(*.f64 a a)
(*.f64 b b)
(*.f64 y-scale y-scale)
(*.f64 x-scale x-scale)
(-.f64 (*.f64 b b) (*.f64 a a))
(cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(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 (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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 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 (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/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 #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)))))))))
(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 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))
(/.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 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) y-scale))
(*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))
(cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64)))
(*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64)))))
(*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a)
(*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b)
(*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))
(*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))
(/.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 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 (PI.f64) angle) (-.f64 (*.f64 b b) (*.f64 a a)))
(+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b 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 (*.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 b) (*.f64 a 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 b) (*.f64 a a)))))
(fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)))
(*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))
(*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(*.f64 y-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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))
(*.f64 (*.f64 y-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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/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 y-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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #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 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 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 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #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 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))))))
(*.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 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 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 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 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 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 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 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 (/.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 b) (*.f64 a a)))))))) (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)) (*.f64 (*.f64 y-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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))))))
(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 (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 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 (*.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)))))))
(*.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))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow 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)))))))))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow 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))))))))))
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow 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 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow 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)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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))))))))))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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)))))))))))
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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(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)) (*.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 #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)) (*.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 #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)) (*.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 #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)) (*.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 #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)) (*.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 #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)) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64)))
Outputs
#s(approx 180 #s(literal 0 binary64))
#s(approx a a)
#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 (* (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 (* (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 (pow a 4) (pow.f64 a #s(literal 4 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 (* (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 (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (*.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 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 (* -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 (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (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 (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 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 (* (* (* (PI) angle) 1/180) 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 (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 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 (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 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 (/ (* 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 (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a 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 b) (* a 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 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (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))))))))
#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 b) (* a 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 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (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 (*.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) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a 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 (pow.f64 a #s(literal 2 binary64)) (-.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 binary64) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (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 4 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (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 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 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a 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 b) (* a 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 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 x-scale (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 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 b) (* a 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 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (/.f64 x-scale (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 x-scale (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 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 (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 b) (* a 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 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 x-scale (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64)))))) (pow.f64 b #s(literal 4 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 x-scale (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 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 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 (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 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 (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 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 (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 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 (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (- (* b b) (* a a)) (sin (* (* (PI) angle) 1/180))))) (/.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 (*.f64 (cos.f64 (*.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 (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (- (* b b) (* a a)) (sin (* (* (PI) angle) 1/180))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 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 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.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 (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 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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/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 (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (- (* b b) (* a a)) (sin (* (* (PI) angle) 1/180))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 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 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 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 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.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 (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)))))))))))) (pow.f64 b #s(literal 2 binary64)))) (+.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 (*.f64 (cos.f64 (*.f64 #s(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 (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 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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/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 (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (- (* b b) (* a a)) (sin (* (* (PI) angle) 1/180))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 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 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.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 (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)))))))))))) (pow.f64 b #s(literal 4 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 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 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.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 (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))))))))))) (pow.f64 b #s(literal 2 binary64))))))) (+.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 (*.f64 (cos.f64 (*.f64 #s(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 (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 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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/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 (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (- (* b b) (* a a)) (sin (* (* (PI) angle) 1/180)))))) (/.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 (* y-scale (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (- (* b b) (* a a)) (sin (* (* (PI) angle) 1/180)))))) (+.f64 (*.f64 (pow.f64 a #s(literal 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 #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 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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 (* y-scale (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (- (* b b) (* a a)) (sin (* (* (PI) angle) 1/180)))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.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 (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 (pow.f64 a #s(literal 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 #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 #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 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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 (* y-scale (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (- (* b b) (* a a)) (sin (* (* (PI) angle) 1/180)))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 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 #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 4 binary64))) (*.f64 #s(literal -1 binary64) (/.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 (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 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.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 #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 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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 (* (* y-scale (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (- (* b b) (* a a)) (sin (* (* (PI) angle) 1/180)))))) -1/2) (*.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 (* (* y-scale (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (- (* b b) (* a a)) (sin (* (* (PI) angle) 1/180)))))) -1/2) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 a #s(literal 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 #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 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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 (* (* y-scale (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (- (* b b) (* a a)) (sin (* (* (PI) angle) 1/180)))))) -1/2) (+.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 (pow.f64 a #s(literal 2 binary64)) (+.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 #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 (pow.f64 a #s(literal 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 #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 (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (- (* b b) (* a a)) (sin (* (* (PI) angle) 1/180)))))) -1/2) (+.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 (pow.f64 a #s(literal 2 binary64)) (+.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 #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 (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 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 #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 4 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.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 (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 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.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 (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow 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 (/ (PI) (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)))) (/.f64 (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))))))))))
#s(approx (/ 1 (/ (PI) (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))))) (/.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 b) (* a 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 b) (* a 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 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 x-scale (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 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 b) (* a 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 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.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 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 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 x-scale (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (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 b) (* a 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 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.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 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 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 x-scale (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64)))))) (pow.f64 b #s(literal 4 binary64)))) (*.f64 #s(literal 90 binary64) (/.f64 (-.f64 (/.f64 x-scale (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64))))) (pow.f64 b #s(literal 2 binary64))))))))))
#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 (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 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 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 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (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 (- (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 (+ (* (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 (* (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 (* (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 (* (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 (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 (* -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 (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (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 (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 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 (- (/ (* 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 (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a 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 b) (* a 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 angle (*.f64 y-scale (PI.f64)))) (/.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 b) (* a a)))) (-.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 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.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 (pow.f64 b #s(literal 2 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))) (pow.f64 a #s(literal 4 binary64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 angle (*.f64 y-scale (PI.f64)))) (/.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 b) (* a a)))) (-.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 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.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 (pow.f64 b #s(literal 2 binary64)) (*.f64 angle (*.f64 y-scale (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 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 (pow.f64 b #s(literal 2 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))) (pow.f64 a #s(literal 4 binary64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 angle (*.f64 y-scale (PI.f64)))) (/.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 b) (* a 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 b) (* a 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 (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 b) (* a a))))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.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 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 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 (pow.f64 b #s(literal 2 binary64)) x-scale) (*.f64 angle (*.f64 y-scale (PI.f64)))))) (pow.f64 a #s(literal 4 binary64))))) (/.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 b) (* a a))))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.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 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 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 (pow.f64 b #s(literal 2 binary64)) x-scale) (*.f64 angle (*.f64 y-scale (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 (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)) x-scale) (*.f64 angle (*.f64 y-scale (PI.f64)))))) (pow.f64 a #s(literal 4 binary64)))) (/.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 (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 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 (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 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 (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (- (* b b) (* a a)) (sin (* (* (PI) angle) 1/180))))) (*.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 (*.f64 (cos.f64 (*.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 (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (- (* b b) (* a a)) (sin (* (* (PI) angle) 1/180))))) (-.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 (*.f64 (cos.f64 (*.f64 #s(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 #s(literal 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 #s(literal 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 (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (- (* b b) (* a a)) (sin (* (* (PI) angle) 1/180))))) (-.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 (*.f64 (cos.f64 (*.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 #s(literal 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 (*.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 (*.f64 (cos.f64 (*.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 #s(literal 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 4 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)) (*.f64 x-scale (*.f64 (cos.f64 (*.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 (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (- (* b b) (* a a)) (sin (* (* (PI) angle) 1/180))))) (-.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 (*.f64 (cos.f64 (*.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 #s(literal 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 4 binary64)) (-.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 (*.f64 (cos.f64 (*.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 #s(literal 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 6 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.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 (*.f64 (cos.f64 (*.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 #s(literal 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 4 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)) (*.f64 x-scale (*.f64 (cos.f64 (*.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 (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (- (* b b) (* a a)) (sin (* (* (PI) angle) 1/180)))))) (*.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 (* y-scale (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (- (* b b) (* a a)) (sin (* (* (PI) angle) 1/180)))))) (-.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 (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 (* y-scale (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (- (* b b) (* a a)) (sin (* (* (PI) angle) 1/180)))))) (-.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 (*.f64 (pow.f64 b #s(literal 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 (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 4 binary64))))) (/.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 (* y-scale (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (- (* b b) (* a a)) (sin (* (* (PI) angle) 1/180)))))) (-.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 (*.f64 (pow.f64 b #s(literal 4 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 (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 6 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 (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 (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 4 binary64)))) (/.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 (* (* y-scale (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (- (* b b) (* a a)) (sin (* (* (PI) angle) 1/180)))))) -1/2) (*.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 (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (- (* b b) (* a a)) (sin (* (* (PI) angle) 1/180)))))) -1/2) (+.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 (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 #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 (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (- (* b b) (* a a)) (sin (* (* (PI) angle) 1/180)))))) -1/2) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 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 (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 4 binary64)))) (+.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 (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 #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 (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (- (* b b) (* a a)) (sin (* (* (PI) angle) 1/180)))))) -1/2) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 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 (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 4 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 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 (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 6 binary64)))) (+.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 (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 #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 (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow 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 b) (* a 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 b) (* a a)))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.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 (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 b) (* a 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 (pow.f64 b #s(literal 2 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 (pow.f64 b #s(literal 2 binary64)) x-scale) (*.f64 angle (*.f64 y-scale (PI.f64)))))) (pow.f64 a #s(literal 4 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 (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 b) (* a 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 (pow.f64 b #s(literal 2 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 (pow.f64 b #s(literal 2 binary64)) x-scale) (*.f64 angle (*.f64 y-scale (PI.f64)))))) (pow.f64 a #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 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 (pow.f64 b #s(literal 2 binary64)) x-scale) (*.f64 angle (*.f64 y-scale (PI.f64)))))) (pow.f64 a #s(literal 6 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 (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 (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 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 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 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (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 b b)
#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 (+ (* (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 (* -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 (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (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 (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 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 (- (/ (* 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 (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* 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))) (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 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))) (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 (pow.f64 b #s(literal 2 binary64)) (-.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 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 (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* 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))) (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 (pow.f64 b #s(literal 2 binary64)) (-.f64 (+.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 (pow.f64 b #s(literal 2 binary64)) (-.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 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 (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 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))) (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 (pow.f64 b #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.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 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 4 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (-.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 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 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 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 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* 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))) (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 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))) (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 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 y-scale (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.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 (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 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))) (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 (pow.f64 b #s(literal 2 binary64)) (-.f64 (+.f64 (/.f64 y-scale (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (*.f64 x-scale (PI.f64))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 y-scale (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.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 (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 (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 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))) (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 (pow.f64 b #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 y-scale (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.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 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64)))))) (pow.f64 a #s(literal 4 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 y-scale (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.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 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64))))) (pow.f64 a #s(literal 2 binary64)))))) (/.f64 y-scale (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.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 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64))))))))
#s(approx (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 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 (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (- (* b b) (* a a)) (sin (* (* (PI) angle) 1/180))))) (*.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 (*.f64 (cos.f64 (*.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 (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (- (* b b) (* a a)) (sin (* (* (PI) angle) 1/180))))) (+.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 (*.f64 (cos.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 #s(literal 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/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 (*.f64 (cos.f64 (*.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 #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 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 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 (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (- (* b b) (* a a)) (sin (* (* (PI) angle) 1/180))))) (+.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 (*.f64 (cos.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 #s(literal 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/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 (*.f64 (cos.f64 (*.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 (+.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 (*.f64 (cos.f64 (*.f64 #s(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 (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/2 binary64) (/.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 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 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 #s(literal 1/2 binary64) (/.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 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 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 (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (- (* b b) (* a a)) (sin (* (* (PI) angle) 1/180))))) (+.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 (*.f64 (cos.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 #s(literal 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/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 (*.f64 (cos.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 (pow.f64 b #s(literal 2 binary64)) (-.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 (*.f64 (cos.f64 (*.f64 #s(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 (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/2 binary64) (/.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 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 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 4 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (-.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 (*.f64 (cos.f64 (*.f64 #s(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 (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/2 binary64) (/.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 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 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 #s(literal 1/2 binary64) (/.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 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 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 (* y-scale (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (- (* b b) (* a a)) (sin (* (* (PI) angle) 1/180)))))) (*.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 (* y-scale (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (- (* b b) (* a a)) (sin (* (* (PI) angle) 1/180)))))) (+.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 (pow.f64 b #s(literal 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 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))))))))))))
#s(approx (* y-scale (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (- (* b b) (* a a)) (sin (* (* (PI) angle) 1/180)))))) (+.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 (pow.f64 b #s(literal 2 binary64)) (-.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 (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 (*.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 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 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 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 (* y-scale (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (- (* b b) (* a a)) (sin (* (* (PI) angle) 1/180)))))) (+.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 (pow.f64 b #s(literal 2 binary64)) (-.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 (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 (pow.f64 b #s(literal 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 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 4 binary64))) (*.f64 #s(literal -1 binary64) (/.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 (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 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 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 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 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 (* (* y-scale (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (- (* b b) (* a a)) (sin (* (* (PI) angle) 1/180)))))) -1/2) (*.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 (* (* y-scale (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (- (* b b) (* a a)) (sin (* (* (PI) angle) 1/180)))))) -1/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 #s(literal 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 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 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 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 (* (* y-scale (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (- (* b b) (* a a)) (sin (* (* (PI) angle) 1/180)))))) -1/2) (+.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 (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 #s(literal 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 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 (pow.f64 b #s(literal 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 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))))))))
#s(approx (* (* y-scale (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (- (* b b) (* a a)) (sin (* (* (PI) angle) 1/180)))))) -1/2) (+.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 (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 #s(literal 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 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 (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) (/.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 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 4 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.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 (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 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 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))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow 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 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))) (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 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))) (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 #s(literal 90 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 y-scale (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.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 (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 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))) (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 (pow.f64 b #s(literal 2 binary64)) (+.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 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 #s(literal 90 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 y-scale (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.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 (pow.f64 a #s(literal 4 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 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))) (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 (pow.f64 b #s(literal 2 binary64)) (+.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 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 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 y-scale (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.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 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64)))))) (pow.f64 a #s(literal 4 binary64)))) (*.f64 #s(literal 90 binary64) (/.f64 (-.f64 (/.f64 y-scale (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.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 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64))))) (pow.f64 a #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 (*.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 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 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 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (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 (- (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 (+ (* (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 (* (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 (* (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 (* (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 (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 (* -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 (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (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 (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 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 (- (/ (* 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 (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a 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 b) (* a 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 (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 b) (* a 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 (*.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 (pow.f64 a #s(literal 2 binary64)) (-.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 (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 4 binary64))))) (/.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 b) (* a 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 (*.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 (pow.f64 a #s(literal 4 binary64)) (-.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 (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 6 binary64))))) (+.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 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 (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 4 binary64)))) (/.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 b) (* a 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 b) (* a 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 (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 b) (* a a))))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64)))) (/.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))) (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 (pow.f64 a #s(literal 2 binary64)) y-scale) (*.f64 angle (*.f64 x-scale (PI.f64)))))) (pow.f64 b #s(literal 4 binary64))))) (/.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 b) (* a a))))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 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))) (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 (pow.f64 a #s(literal 2 binary64)) y-scale) (*.f64 angle (*.f64 x-scale (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))) (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 (pow.f64 a #s(literal 2 binary64)) y-scale) (*.f64 angle (*.f64 x-scale (PI.f64)))))) (pow.f64 b #s(literal 4 binary64)))) (/.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 (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 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 (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 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 (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (- (* b b) (* a a)) (sin (* (* (PI) angle) 1/180))))) (/.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 (*.f64 (cos.f64 (*.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 (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (- (* b b) (* a a)) (sin (* (* (PI) angle) 1/180))))) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.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 (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 (*.f64 (cos.f64 (*.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 #s(literal 1/2 binary64) (*.f64 #s(literal 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 #s(literal 1/2 binary64) (*.f64 #s(literal -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 (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 (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (- (* b b) (* a a)) (sin (* (* (PI) angle) 1/180))))) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.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 (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 (*.f64 (cos.f64 (*.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 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 (pow.f64 a #s(literal 2 binary64)) (-.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 (*.f64 (cos.f64 (*.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 #s(literal 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 #s(literal 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 4 binary64)))))) (+.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 (*.f64 (cos.f64 (*.f64 #s(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 (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 (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (- (* b b) (* a a)) (sin (* (* (PI) angle) 1/180))))) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.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 (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 (*.f64 (cos.f64 (*.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 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 (pow.f64 a #s(literal 4 binary64)) (-.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 (*.f64 (cos.f64 (*.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 #s(literal 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 #s(literal 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 6 binary64)))))) (+.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 (*.f64 (cos.f64 (*.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 (/.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 (*.f64 (cos.f64 (*.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 #s(literal 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 #s(literal 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 4 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (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 (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (- (* b b) (* a a)) (sin (* (* (PI) angle) 1/180)))))) (/.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 (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (- (* b b) (* a a)) (sin (* (* (PI) angle) 1/180)))))) (-.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 #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)))))))))))
#s(approx (* y-scale (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (- (* b b) (* a a)) (sin (* (* (PI) angle) 1/180)))))) (-.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 (*.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 (/.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 #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 4 binary64))))) (*.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)))))))))))
#s(approx (* y-scale (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (- (* b b) (* a a)) (sin (* (* (PI) angle) 1/180)))))) (-.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 (*.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 4 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 x-scale (*.f64 (cos.f64 (*.f64 #s(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 6 binary64))))) (+.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 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 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 x-scale (*.f64 (cos.f64 (*.f64 #s(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 4 binary64)))))))
#s(approx (* (* y-scale (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (- (* b b) (* a a)) (sin (* (* (PI) angle) 1/180)))))) -1/2) (*.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 (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (- (* b b) (* a a)) (sin (* (* (PI) angle) 1/180)))))) -1/2) (+.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 (*.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 #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))))))
#s(approx (* (* y-scale (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (- (* b b) (* a a)) (sin (* (* (PI) angle) 1/180)))))) -1/2) (+.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 (pow.f64 a #s(literal 2 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 x-scale (*.f64 (cos.f64 (*.f64 #s(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 4 binary64)))) (*.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 #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)))))))
#s(approx (* (* y-scale (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (- (* b b) (* a a)) (sin (* (* (PI) angle) 1/180)))))) -1/2) (+.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 (pow.f64 a #s(literal 2 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 x-scale (*.f64 (cos.f64 (*.f64 #s(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 4 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 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 x-scale (*.f64 (cos.f64 (*.f64 #s(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 6 binary64)))) (*.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 #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))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow 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 b) (* a 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 b) (* a a)))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 y-scale (*.f64 angle (*.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 (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 b) (* a 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 (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))) (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 (pow.f64 a #s(literal 2 binary64)) y-scale) (*.f64 angle (*.f64 x-scale (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))) (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 (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 b) (* a 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 (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))) (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 (pow.f64 a #s(literal 2 binary64)) y-scale) (*.f64 angle (*.f64 x-scale (PI.f64)))))) (pow.f64 b #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 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))) (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 (pow.f64 a #s(literal 2 binary64)) y-scale) (*.f64 angle (*.f64 x-scale (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))) (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 (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 (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 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 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 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (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 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)))) 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 (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 (* (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 (* (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 (* (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 (* 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 (* (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 (pow (sin (* 1/180 (* angle (PI)))) 4) (*.f64 #s(literal 1/1049760000 binary64) (*.f64 (pow.f64 angle #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 4) (*.f64 (pow.f64 angle #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -1/51018336000000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 4) (*.f64 (pow.f64 angle #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/51018336000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/9917964518400000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))) (*.f64 #s(literal 1/16200 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)))))))))))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 4) (*.f64 (pow.f64 angle #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/51018336000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/9917964518400000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))) (+.f64 (*.f64 #s(literal 1/16200 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 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/1574640000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 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 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #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 (* 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 (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (*.f64 #s(literal 1/1049760000 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 angle #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))))))
#s(approx (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (*.f64 (pow.f64 angle #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -1/51018336000000 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 #s(literal 1/1049760000 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))
#s(approx (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (*.f64 (pow.f64 angle #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal 1/1049760000 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/51018336000000 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/9917964518400000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))) (*.f64 #s(literal 1/16200 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))))))))))))))
#s(approx (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (*.f64 (pow.f64 angle #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal 1/1049760000 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/51018336000000 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/1574640000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 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 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #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 4 binary64)) (+.f64 (*.f64 #s(literal 1/9917964518400000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))) (*.f64 #s(literal 1/16200 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)))))))))))))))
#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 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 #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 (sin (* 1/180 (* angle (PI)))) 4)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))
#s(approx (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/102036672000000 binary64) (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64))) (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))
#s(approx (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (sqrt.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/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 1/9917964518400000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))) (*.f64 #s(literal 1/16200 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 #s(literal 1/10411482432835584000000000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 12 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))))
#s(approx (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (sqrt.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/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (sqrt.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/2 binary64) (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/1574640000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 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 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #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 #s(literal -1/102036672000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 1/9917964518400000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))) (*.f64 #s(literal 1/16200 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 #s(literal 1/10411482432835584000000000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 12 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/9917964518400000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))) (*.f64 #s(literal 1/16200 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 #s(literal 1/10411482432835584000000000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 12 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))))))
#s(approx (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 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 (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 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/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))))))
#s(approx (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 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 (*.f64 #s(literal -1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (sqrt.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/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 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/9917964518400000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))) (*.f64 #s(literal 1/16200 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 #s(literal 1/10411482432835584000000000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 12 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))))))))))
#s(approx (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 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 (*.f64 #s(literal -1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (sqrt.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/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/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/9917964518400000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))) (*.f64 #s(literal 1/16200 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 #s(literal 1/10411482432835584000000000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 12 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.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/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/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/1574640000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 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 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #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 #s(literal -1/102036672000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 1/9917964518400000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))) (*.f64 #s(literal 1/16200 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 #s(literal 1/10411482432835584000000000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 12 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))))))))))))))
#s(approx (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 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 (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 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/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal -1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))))))
#s(approx (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 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/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal -1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (sqrt.f64 (*.f64 #s(literal 1/1049760000 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/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 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/9917964518400000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))) (*.f64 #s(literal 1/16200 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 #s(literal 1/10411482432835584000000000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 12 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))))))))
#s(approx (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 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/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal -1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (sqrt.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 y-scale (+.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 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/9917964518400000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))) (*.f64 #s(literal 1/16200 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 #s(literal 1/10411482432835584000000000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 12 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (*.f64 #s(literal 1/1049760000 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/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/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/1574640000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 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 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #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 #s(literal -1/102036672000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 1/9917964518400000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))) (*.f64 #s(literal 1/16200 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 #s(literal 1/10411482432835584000000000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 12 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 angle (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale (PI.f64)))))
#s(approx (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (*.f64 angle (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 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/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal -1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (*.f64 x-scale (PI.f64)))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #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)))))) (*.f64 x-scale (pow.f64 (PI.f64) #s(literal 2 binary64))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (*.f64 angle (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 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/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal -1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (sqrt.f64 (*.f64 #s(literal 1/1049760000 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/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 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/9917964518400000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))) (*.f64 #s(literal 1/16200 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 #s(literal 1/10411482432835584000000000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 12 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (*.f64 #s(literal 1/1049760000 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/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal -1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (*.f64 x-scale (PI.f64)))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #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)))))) (*.f64 x-scale (pow.f64 (PI.f64) #s(literal 2 binary64))))))) (PI.f64))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #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))))))) (*.f64 x-scale (pow.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #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)))))) (*.f64 x-scale (pow.f64 (PI.f64) #s(literal 2 binary64))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (*.f64 angle (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 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/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal -1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 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/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 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/9917964518400000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))) (*.f64 #s(literal 1/16200 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 #s(literal 1/10411482432835584000000000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 12 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (*.f64 #s(literal 1/1049760000 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/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/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/1574640000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 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 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #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 #s(literal -1/102036672000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 1/9917964518400000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))) (*.f64 #s(literal 1/16200 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 #s(literal 1/10411482432835584000000000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 12 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (*.f64 #s(literal 1/1049760000 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/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 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/9917964518400000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))) (*.f64 #s(literal 1/16200 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 #s(literal 1/10411482432835584000000000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 12 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (*.f64 #s(literal 1/1049760000 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/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal -1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (*.f64 x-scale (PI.f64)))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #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)))))) (*.f64 x-scale (pow.f64 (PI.f64) #s(literal 2 binary64))))))) (PI.f64))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #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))))))) (*.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/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal -1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (*.f64 x-scale (PI.f64)))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #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)))))) (*.f64 x-scale (pow.f64 (PI.f64) #s(literal 2 binary64))))))) (PI.f64))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #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)))))))) (*.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/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal -1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (*.f64 x-scale (PI.f64)))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #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)))))) (*.f64 x-scale (pow.f64 (PI.f64) #s(literal 2 binary64))))))) (PI.f64))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #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))))))) (*.f64 x-scale (pow.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #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)))))) (*.f64 x-scale (pow.f64 (PI.f64) #s(literal 2 binary64))))))))))
#s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 angle (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale (PI.f64)))))
#s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 angle (+.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) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal -1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (*.f64 x-scale (PI.f64)))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #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)))))) (*.f64 x-scale (pow.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale (PI.f64)))))))
#s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 angle (+.f64 (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 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 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/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 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/9917964518400000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))) (*.f64 #s(literal 1/16200 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 #s(literal 1/10411482432835584000000000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 12 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (*.f64 #s(literal 1/1049760000 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/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal -1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (*.f64 x-scale (PI.f64)))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #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)))))) (*.f64 x-scale (pow.f64 (PI.f64) #s(literal 2 binary64))))))) (PI.f64))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #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))))))) (*.f64 x-scale (pow.f64 (PI.f64) #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) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal -1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (*.f64 x-scale (PI.f64)))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #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)))))) (*.f64 x-scale (pow.f64 (PI.f64) #s(literal 2 binary64))))))))))))
#s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 angle (+.f64 (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 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 1/2 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal -1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (*.f64 x-scale (PI.f64)))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #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)))))) (*.f64 x-scale (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 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.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/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/1574640000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 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 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #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 #s(literal -1/102036672000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 1/9917964518400000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))) (*.f64 #s(literal 1/16200 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 #s(literal 1/10411482432835584000000000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 12 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (*.f64 #s(literal 1/1049760000 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/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 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/9917964518400000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))) (*.f64 #s(literal 1/16200 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 #s(literal 1/10411482432835584000000000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 12 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (*.f64 #s(literal 1/1049760000 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/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal -1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (*.f64 x-scale (PI.f64)))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #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)))))) (*.f64 x-scale (pow.f64 (PI.f64) #s(literal 2 binary64))))))) (PI.f64))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #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))))))) (*.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/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal -1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (*.f64 x-scale (PI.f64)))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #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)))))) (*.f64 x-scale (pow.f64 (PI.f64) #s(literal 2 binary64))))))) (PI.f64))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #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)))))))) (*.f64 x-scale (pow.f64 (PI.f64) #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/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 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/9917964518400000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))) (*.f64 #s(literal 1/16200 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 #s(literal 1/10411482432835584000000000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 12 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (*.f64 #s(literal 1/1049760000 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/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal -1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (*.f64 x-scale (PI.f64)))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #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)))))) (*.f64 x-scale (pow.f64 (PI.f64) #s(literal 2 binary64))))))) (PI.f64))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #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))))))) (*.f64 x-scale (pow.f64 (PI.f64) #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 -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 (* (* (* (PI) angle) 1/180) 2) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))
#s(approx (cos (* (* (* (PI) angle) 1/180) 2)) (+.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 (cos (* (* (* (PI) angle) 1/180) 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 (* (* (* (PI) angle) 1/180) 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 (* (* (* (PI) angle) 1/180) 2))) #s(literal -1/2 binary64))
#s(approx (* -1/2 (cos (* (* (* (PI) angle) 1/180) 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 (* (* (* (PI) angle) 1/180) 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 (* (* (* (PI) angle) 1/180) 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 (* (* (* (PI) angle) 1/180) 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 (* (* (* (PI) angle) 1/180) 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 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2) #s(literal 1/2 binary64))
#s(approx (* (cos (* (* (* (PI) angle) 1/180) 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 (* (* (* (PI) angle) 1/180) 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 (* (* (* (PI) angle) 1/180) 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 (* (* (* (PI) angle) 1/180) 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 (* (* (* (PI) angle) 1/180) 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 (* (* (* (PI) angle) 1/180) 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 (* (* (* (PI) angle) 1/180) 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 (* (* (* (PI) angle) 1/180) 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 (* (* (* (PI) angle) 1/180) 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 (* (* (* (PI) angle) 1/180) 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 (* (* (* (PI) angle) 1/180) 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 (* (* (* (PI) angle) 1/180) 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 (* (* (* (PI) angle) 1/180) 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 (* (* (* (PI) angle) 1/180) 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 (* (* (* (PI) angle) 1/180) 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 (* (* (* (PI) angle) 1/180) 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 (* (* (* (PI) angle) 1/180) 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 (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 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 (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 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 (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* 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))) (+.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 (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 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 (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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))
#s(approx (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 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 (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 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 (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 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 (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 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 (* x-scale (cos (* (* (PI) angle) 1/180))) x-scale)
#s(approx (* x-scale (cos (* (* (PI) angle) 1/180))) (+.f64 x-scale (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 x-scale (pow.f64 (PI.f64) #s(literal 2 binary64)))))))
#s(approx (* x-scale (cos (* (* (PI) angle) 1/180))) (+.f64 x-scale (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 x-scale (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/25194240000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 x-scale (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))
#s(approx (* x-scale (cos (* (* (PI) angle) 1/180))) (+.f64 x-scale (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 x-scale (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 x-scale (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 #s(literal 1/25194240000 binary64) (*.f64 x-scale (pow.f64 (PI.f64) #s(literal 4 binary64))))))))))
#s(approx (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (- (* b b) (* a a)) (sin (* (* (PI) angle) 1/180))))) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))
#s(approx (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (- (* b b) (* a a)) (sin (* (* (PI) angle) 1/180))))) (/.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 (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 (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 32400 binary64) (/.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))))))))) (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 (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (- (* b b) (* a a)) (sin (* (* (PI) angle) 1/180))))) (/.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 (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 (*.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 (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 (*.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 (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 (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 32400 binary64) (/.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))))))))) (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 (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(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 (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 (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(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 (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 (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (- (* b b) (* a a)) (sin (* (* (PI) angle) 1/180))))) (/.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 (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 (*.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 (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 (*.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 (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 (*.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 (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 (*.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 (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 (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 32400 binary64) (/.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))))))))) (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 (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(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 (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 (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 32400 binary64) (/.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))))))))) (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 (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(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 (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 (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 32400 binary64) (/.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))))))))) (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 (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(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 (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 (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(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 (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 (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (- (* b b) (* a a)) (sin (* (* (PI) angle) 1/180)))))) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))
#s(approx (* y-scale (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (- (* b b) (* a a)) (sin (* (* (PI) angle) 1/180)))))) (/.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 (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 #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 (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 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(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 (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 (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (- (* b b) (* a a)) (sin (* (* (PI) angle) 1/180)))))) (/.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 (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 #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 (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 #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 (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 #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 (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 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(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 (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 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(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 (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 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(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 (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 (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (- (* b b) (* a a)) (sin (* (* (PI) angle) 1/180)))))) (/.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 (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 #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 (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 #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 (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/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 (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 #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 (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 #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 (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 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(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 (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 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(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 (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 #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 (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 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(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 (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 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(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 (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 #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 (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 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(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 (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 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(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 (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 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(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 (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 (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (- (* b b) (* a a)) (sin (* (* (PI) angle) 1/180)))))) -1/2) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))
#s(approx (* (* y-scale (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (- (* b b) (* a a)) (sin (* (* (PI) angle) 1/180)))))) -1/2) (/.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 (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 #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 (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 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(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 (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 (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (- (* b b) (* a a)) (sin (* (* (PI) angle) 1/180)))))) -1/2) (/.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 (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 #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 (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 #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 (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 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(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 (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 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(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 (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 #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 (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 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(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 (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 (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (- (* b b) (* a a)) (sin (* (* (PI) angle) 1/180)))))) -1/2) (/.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 (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 #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 (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 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(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 (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/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 (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 #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 (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 #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 (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 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(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 (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 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(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 (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 #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 (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 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(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 (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 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(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 (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 #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 (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 #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 (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 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(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 (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 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(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 (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 (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* 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))) (+.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #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 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 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 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 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (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 (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 (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)))) (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 (* (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 (pow (sin (* 1/180 (* angle (PI)))) 4) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))
#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 (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 (sin (* 1/180 (* angle (PI)))) 4)) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))
#s(approx (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (+.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 (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (*.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 (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/.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 #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 (cos (* (* (* (PI) angle) 1/180) 2)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))
#s(approx (* -1/2 (cos (* (* (* (PI) angle) 1/180) 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 (* (* (* (PI) angle) 1/180) 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 (* (cos (* (* (* (PI) angle) 1/180) 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 (* (* (* (PI) angle) 1/180) 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 (* x-scale (cos (* (* (PI) angle) 1/180))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
#s(approx (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (- (* b b) (* a a)) (sin (* (* (PI) angle) 1/180))))) (/.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 (cos.f64 (*.f64 #s(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 (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (- (* b b) (* a a)) (sin (* (* (PI) angle) 1/180)))))) (/.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))
#s(approx (* (* y-scale (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (- (* b b) (* a a)) (sin (* (* (PI) angle) 1/180)))))) -1/2) (*.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 (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 (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 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 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 (* x-scale x-scale) (pow.f64 x-scale #s(literal 2 binary64)))
#s(approx (* x-scale (- (pow a 2) (sqrt (pow a 4)))) (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))))
#s(approx (/ (* x-scale (- (pow a 2) (sqrt (pow a 4)))) y-scale) (/.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 #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 (- (/ (* 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 b) (* a 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 (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 b) (* a 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 (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))) (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 (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 (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a 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 (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 b) (* a 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 (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))) (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 (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 #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 b) (* a 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 (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 b) (* a 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 (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))) (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 (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 #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 (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (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 (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* 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))) (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 (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 b) (* a 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 (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))) (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 (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 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))) (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 (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 b) (* a 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 (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))) (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 (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)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 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 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))) (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 (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 b) (* a 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 (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))) (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 (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))) (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 (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (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 (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* 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))) (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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 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 (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 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))) (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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.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 (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 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 y-scale y-scale)
#s(approx (* y-scale y-scale) (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 (+.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 (- (/ (* 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 b) (* a a)))) (/.f64 (pow.f64 a #s(literal 2 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 (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a 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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (/.f64 (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))))))) 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 b) (* a a))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) x-scale) (*.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 (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* 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 (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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (/.f64 (*.f64 (pow.f64 a #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))))))) 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 (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a 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 (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 b) (* a 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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 (pow.f64 a #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)))))))) 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 (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (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 (* (- (/ (* a a) (* y-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 b) (* a 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 (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 b) (* a 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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 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 (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a 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 (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 b) (* a 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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 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 (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 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(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 b) (* a 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 (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 b) (* a 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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.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 (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 (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 (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (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 (* (- (/ (* a a) (* y-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 b) (* a 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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 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 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (/.f64 (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 (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a 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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 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 (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 b) (* a 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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.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 (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 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)))))))))))))
Calls

15 calls:

TimeVariablePoint
16.0ms
x-scale
-inf
14.0ms
angle
0
12.0ms
a
0
10.0ms
angle
inf
10.0ms
y-scale
0

rewrite228.0ms (2.1%)

Memory
6.7MiB live, 146.2MiB allocated; 18ms collecting garbage
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
01797332
02807052
113886740
042646740
Stop Event
iter-limit
node-limit
iter-limit
Counts
115 → 979
Calls
Call 1
Inputs
#s(literal 180 binary64)
a
angle
(PI.f64)
#s(literal 2 binary64)
b
y-scale
x-scale
(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)))
#s(literal 1/180 binary64)
(*.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))))
(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))))
(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)))
(*.f64 (pow.f64 b #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))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))
#s(literal 4 binary64)
#s(literal 1/2 binary64)
#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))))
(*.f64 (cos.f64 (*.f64 #s(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)))))
(pow.f64 a #s(literal 4 binary64))
#s(literal 1 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)))))
#s(literal 90 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 (PI.f64) angle)
(*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))
(*.f64 a a)
(*.f64 b b)
(*.f64 y-scale y-scale)
(*.f64 x-scale x-scale)
(-.f64 (*.f64 b b) (*.f64 a a))
(cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(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 (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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 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 (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/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 #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)))))))))
(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 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))
(/.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 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) y-scale))
(*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))
(cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64)))
(*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64)))))
(*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a)
(*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b)
(*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))
(*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))
(/.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 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 (PI.f64) angle) (-.f64 (*.f64 b b) (*.f64 a a)))
(+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b 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 (*.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 b) (*.f64 a 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 b) (*.f64 a a)))))
(fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)))
(*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))
(*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(*.f64 y-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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))
(*.f64 (*.f64 y-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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/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 y-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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #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 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 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 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #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 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))))))
(*.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 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 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 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 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 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 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 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 (/.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 b) (*.f64 a a)))))))) (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)) (*.f64 (*.f64 y-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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))))))
(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 (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 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 (*.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)))))))
(*.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))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow 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)))))))))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow 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))))))))))
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow 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 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow 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)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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))))))))))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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)))))))))))
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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(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)) (*.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 #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)) (*.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 #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)) (*.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 #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)) (*.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 #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)) (*.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 #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)) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64)))
Outputs
#s(literal 180 binary64)
a
angle
(PI.f64)
#s(literal 2 binary64)
b
y-scale
x-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 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 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 a) a) (*.f64 b b))) (*.f64 b b))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 a a)) (*.f64 b b))) (*.f64 b b))
(*.f64 (+.f64 b a) (-.f64 b a))
(*.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 (*.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 (*.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 b b) (*.f64 (neg.f64 a) a))
(+.f64 (*.f64 b b) (neg.f64 (*.f64 a a)))
#s(literal 1/180 binary64)
(*.f64 (PI.f64) angle)
(*.f64 angle (PI.f64))
(log.f64 (pow.f64 (exp.f64 (PI.f64)) angle))
(*.f64 (/.f64 (PI.f64) #s(literal 180 binary64)) (/.f64 angle #s(literal 1 binary64)))
(*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))
(*.f64 (*.f64 angle #s(literal 1/180 binary64)) (/.f64 (PI.f64) #s(literal 1 binary64)))
(*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))
(*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))
(*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))
(*.f64 (PI.f64) (*.f64 angle #s(literal 1/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 (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/180 binary64) angle)))
(log.f64 (pow.f64 (exp.f64 (PI.f64)) (*.f64 angle #s(literal 1/180 binary64))))
(sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (/.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64)) (PI.f64)) #s(literal 2 binary64)))
(cos.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(cos.f64 (neg.f64 (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(cos.f64 (fabs.f64 (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(cos.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))
(cos.f64 (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))
(cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(+.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(*.f64 (fabs.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (fabs.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(*.f64 (neg.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (neg.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 1 binary64)) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 1 binary64)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))
(pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #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) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 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) angle) #s(literal 1/90 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) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 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) angle) #s(literal 1/90 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) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (cos.f64 (-.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (cos.f64 (-.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (cos.f64 (-.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (cos.f64 (-.f64 (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (cos.f64 (-.f64 (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (cos.f64 (-.f64 (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (cos.f64 (-.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (cos.f64 (-.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (cos.f64 (-.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64)) (PI.f64)) #s(literal 2 binary64)) (/.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64)) (PI.f64)) #s(literal 2 binary64)))) (cos.f64 (+.f64 (/.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64)) (PI.f64)) #s(literal 2 binary64)) (/.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64)) (PI.f64)) #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64)) (PI.f64)) #s(literal 2 binary64)) (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (sin.f64 (+.f64 (/.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64)) (PI.f64)) #s(literal 2 binary64)) (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64)) (PI.f64)) #s(literal 2 binary64)) (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (sin.f64 (+.f64 (/.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64)) (PI.f64)) #s(literal 2 binary64)) (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64)) (PI.f64)) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (+.f64 (/.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64)) (PI.f64)) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #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) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 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) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 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) angle) #s(literal 1/90 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) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))))
(neg.f64 (-.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) #s(literal 1/2 binary64)))
(-.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(-.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(-.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 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 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64)) (PI.f64)) #s(literal 2 binary64))))))
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) #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 (PI.f64) angle) #s(literal 1/180 binary64)))))))
(+.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))
(sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(*.f64 (fabs.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (fabs.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(*.f64 (neg.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (neg.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 1 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 1 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))
(pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #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) angle) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (neg.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 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) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 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) angle) #s(literal 1/90 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) angle) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (neg.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 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) angle) #s(literal 1/90 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) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))))
(/.f64 (-.f64 (cos.f64 (-.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (cos.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #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) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 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) angle) #s(literal 1/90 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) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))
(neg.f64 (-.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))
(+.f64 #s(literal 1/2 binary64) (*.f64 (neg.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)))
(+.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))
(*.f64 (fabs.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a)) (fabs.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a)))
(*.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a)) (neg.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a)))
(*.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 1 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 1 binary64)) (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a))
(*.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a))
(*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) a) a)
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 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) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))
(*.f64 a (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) a))
(pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a)) #s(literal 2 binary64)))
(*.f64 (fabs.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b)) (fabs.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b)))
(*.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b)) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b)))
(*.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b) #s(literal 1 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b) #s(literal 1 binary64)) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b))
(*.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b))
(*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) b) b)
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 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) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))
(*.f64 b (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) b))
(pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b)) #s(literal 2 binary64)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) a)) a) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (*.f64 b b)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))
(/.f64 (-.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)) #s(literal 2 binary64))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))))
(/.f64 (-.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 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) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) a)) a))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) a)) a)))
(/.f64 (-.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) #s(literal 2 binary64)) (*.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))) (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 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) angle) #s(literal 1/90 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) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)) (*.f64 (neg.f64 (*.f64 b b)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)) #s(literal 2 binary64)) (*.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b))) (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b))))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)) (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 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 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)) #s(literal 2 binary64)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 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) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) a)) a) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 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) angle) #s(literal 1/90 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) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) a)) a)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) a)) a)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) #s(literal 2 binary64)) (+.f64 (*.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))) (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 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) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 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) angle) #s(literal 1/90 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) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)) (*.f64 (neg.f64 (*.f64 b b)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)) #s(literal 2 binary64)) (+.f64 (*.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b))) (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)) (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 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 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)) #s(literal 2 binary64)) (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) #s(literal 2 binary64))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 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 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)) #s(literal 3 binary64)) (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) #s(literal 2 binary64)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b))))))
(-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) a)) a))
(-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))))
(-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)) (*.f64 (neg.f64 (*.f64 b b)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))
(-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)) (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b))))
(+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))
(+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)))
(*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))
(*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))
(/.f64 (-.f64 (cos.f64 (-.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (/.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64)) (PI.f64)) #s(literal 2 binary64)))) (cos.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (/.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64)) (PI.f64)) #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64)) (PI.f64)) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (cos.f64 (+.f64 (/.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64)) (PI.f64)) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (sin.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (sin.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 2 binary64))
#s(literal 4 binary64)
#s(literal 1/2 binary64)
#s(literal -1/2 binary64)
(*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (+.f64 b a) (-.f64 b a)))
(*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))
(*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (+.f64 b a) (-.f64 b a))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))
(*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (+.f64 b a) (-.f64 b a)))
(*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (+.f64 b a) (-.f64 b a))))
(*.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)))
#s(literal 1 binary64)
(*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (PI.f64))
(*.f64 (PI.f64) (*.f64 (+.f64 b a) (-.f64 b a)))
(log.f64 (pow.f64 (exp.f64 (PI.f64)) (*.f64 (+.f64 b a) (-.f64 b a))))
(*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))
(*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (PI.f64)) angle)
(*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) angle))
(*.f64 (PI.f64) (*.f64 angle (*.f64 (+.f64 b a) (-.f64 b a))))
(*.f64 angle (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (PI.f64)))
#s(literal 90 binary64)
(*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))
(*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (+.f64 b a) (-.f64 b a))))
(*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (+.f64 b a) (-.f64 b a))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) x-scale)
(*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale))
(*.f64 x-scale (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (+.f64 b a) (-.f64 b a))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(*.f64 (PI.f64) angle)
(*.f64 angle (PI.f64))
(log.f64 (pow.f64 (exp.f64 (PI.f64)) angle))
(*.f64 (/.f64 (PI.f64) #s(literal 180 binary64)) (/.f64 angle #s(literal 1 binary64)))
(*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))
(*.f64 (*.f64 angle #s(literal 1/180 binary64)) (/.f64 (PI.f64) #s(literal 1 binary64)))
(*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))
(*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))
(*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))
(*.f64 (PI.f64) (*.f64 angle #s(literal 1/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 (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/180 binary64) angle)))
(log.f64 (pow.f64 (exp.f64 (PI.f64)) (*.f64 angle #s(literal 1/180 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 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 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 (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 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 a) a) (*.f64 b b))) (*.f64 b b))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 a a)) (*.f64 b b))) (*.f64 b b))
(*.f64 (+.f64 b a) (-.f64 b a))
(*.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 (*.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 (*.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 b b) (*.f64 (neg.f64 a) a))
(+.f64 (*.f64 b b) (neg.f64 (*.f64 a a)))
(sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (/.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64)) (PI.f64)) #s(literal 2 binary64)))
(cos.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(cos.f64 (neg.f64 (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(cos.f64 (fabs.f64 (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(cos.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))
(cos.f64 (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))
(cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(+.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (/.f64 #s(literal 4 binary64) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (/.f64 #s(literal 4 binary64) #s(literal 2 binary64))))
(pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))
(exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))
(*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))
(*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) x-scale)
(*.f64 x-scale (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(*.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) (/.f64 #s(literal 4 binary64) #s(literal 2 binary64))) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) (/.f64 #s(literal 4 binary64) #s(literal 2 binary64))))
(*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64)) (pow.f64 a #s(literal 4 binary64)))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64)))
(pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64))
(exp.f64 (*.f64 (log.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a)) #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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))
(*.f64 (pow.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(pow.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64)) #s(literal 1/2 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64)) #s(literal -1/2 binary64)))
(sqrt.f64 (*.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64)))))
(sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64)))
(fabs.f64 (neg.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64)))))
(fabs.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))))
(exp.f64 (*.f64 (log.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) #s(literal 1/2 binary64)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))))
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))))) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64)))))
(/.f64 (-.f64 (*.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64)))) (*.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))
(/.f64 (+.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (-.f64 (*.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64)))))))
(/.f64 (-.f64 (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #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) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (+.f64 (*.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64)))) (+.f64 (*.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))))
(/.f64 (-.f64 (*.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (-.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))
(/.f64 (+.f64 (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64)))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))))
(-.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))
(+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))
(+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64)))))) (*.f64 y-scale (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64)))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) y-scale) (*.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) y-scale))) (*.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) y-scale))
(*.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) y-scale)
(*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))
(/.f64 (-.f64 (*.f64 (*.f64 y-scale (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64)))) (*.f64 y-scale (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))))) (*.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))) (-.f64 (*.f64 y-scale (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64)))) (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) y-scale) (*.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) y-scale)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) y-scale) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) y-scale))) (-.f64 (*.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) y-scale) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) y-scale)))
(/.f64 (+.f64 (pow.f64 (*.f64 y-scale (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #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) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 y-scale (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64)))) (*.f64 y-scale (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))))) (-.f64 (*.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (*.f64 y-scale (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64)))) (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #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) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) y-scale) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) y-scale) (*.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) y-scale)) (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) y-scale) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) y-scale)) (*.f64 (*.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) y-scale) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) y-scale)))))
(+.f64 (*.f64 y-scale (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64)))) (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))
(+.f64 (*.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) y-scale) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) y-scale))
(*.f64 (/.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale)) (/.f64 y-scale (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(*.f64 (/.f64 y-scale (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale)) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(*.f64 (/.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) x-scale) (/.f64 y-scale (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(*.f64 (/.f64 y-scale (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) x-scale))
(*.f64 (/.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (/.f64 y-scale x-scale))
(*.f64 (/.f64 y-scale x-scale) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(*.f64 (*.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) y-scale) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(*.f64 y-scale (/.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(/.f64 (neg.f64 (/.f64 (*.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) y-scale) x-scale)) (neg.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) y-scale))) (neg.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))
(/.f64 (/.f64 (*.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) y-scale) x-scale) (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(/.f64 (neg.f64 (*.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) y-scale)) (neg.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(/.f64 (*.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) y-scale) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (/.f64 (*.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) y-scale) x-scale)))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (neg.f64 (*.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) y-scale))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) y-scale)))
(+.f64 (/.f64 (*.f64 y-scale (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64)))) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(+.f64 (/.f64 (*.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) y-scale) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) y-scale) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(*.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale)) (/.f64 (*.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) y-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(*.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (/.f64 (*.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) y-scale) x-scale))
(*.f64 (/.f64 #s(literal 1/2 binary64) x-scale) (/.f64 (*.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) y-scale) (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(*.f64 (/.f64 (*.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) y-scale) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) y-scale) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(/.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) y-scale))) (neg.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) y-scale)) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) 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 (/.f64 (*.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) y-scale) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 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 (neg.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) (*.f64 a a))) (*.f64 a a))
(*.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)))) x-scale)
(*.f64 x-scale (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))
(*.f64 (*.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) x-scale) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 x-scale (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale))
(/.f64 (neg.f64 (neg.f64 (*.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) x-scale))) (neg.f64 (neg.f64 y-scale)))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) x-scale)) (neg.f64 y-scale))
(/.f64 (*.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) x-scale) y-scale)
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 y-scale) (neg.f64 (*.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) x-scale))))
(/.f64 #s(literal 1 binary64) (/.f64 y-scale (*.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #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 x-scale (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)))
(*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))
(*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))
(cos.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64)))))
(cos.f64 (neg.f64 (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64)))))
(cos.f64 (fabs.f64 (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64)))))
(cos.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))))
(cos.f64 (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))))
(cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64)))
(+.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))
(*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(*.f64 (fabs.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (fabs.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(*.f64 (neg.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (neg.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 1 binary64)) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 1 binary64)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))
(pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #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) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 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) angle) #s(literal 1/90 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) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 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) angle) #s(literal 1/90 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) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (cos.f64 (-.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (cos.f64 (-.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (cos.f64 (-.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (cos.f64 (-.f64 (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (cos.f64 (-.f64 (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (cos.f64 (-.f64 (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (cos.f64 (-.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (cos.f64 (-.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (cos.f64 (-.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64)) (PI.f64)) #s(literal 2 binary64)) (/.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64)) (PI.f64)) #s(literal 2 binary64)))) (cos.f64 (+.f64 (/.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64)) (PI.f64)) #s(literal 2 binary64)) (/.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64)) (PI.f64)) #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64)) (PI.f64)) #s(literal 2 binary64)) (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (sin.f64 (+.f64 (/.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64)) (PI.f64)) #s(literal 2 binary64)) (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64)) (PI.f64)) #s(literal 2 binary64)) (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (sin.f64 (+.f64 (/.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64)) (PI.f64)) #s(literal 2 binary64)) (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64)) (PI.f64)) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (+.f64 (/.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64)) (PI.f64)) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #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) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 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) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 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) angle) #s(literal 1/90 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) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))))
(neg.f64 (-.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) #s(literal 1/2 binary64)))
(-.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(-.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(-.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 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 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64)) (PI.f64)) #s(literal 2 binary64))))))
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) #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 (PI.f64) angle) #s(literal 1/180 binary64)))))))
(+.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))
(*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(*.f64 (fabs.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (fabs.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(*.f64 (neg.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (neg.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 1 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 1 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))
(pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #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) angle) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (neg.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 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) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 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) angle) #s(literal 1/90 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) angle) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (neg.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 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) angle) #s(literal 1/90 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) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))))
(/.f64 (-.f64 (cos.f64 (-.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (cos.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #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) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 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) angle) #s(literal 1/90 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) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))
(neg.f64 (-.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))
(+.f64 #s(literal 1/2 binary64) (*.f64 (neg.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)))
(+.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) a)
(*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))
(*.f64 (fabs.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a)) (fabs.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a)))
(*.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a)) (neg.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a)))
(*.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 1 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 1 binary64)) (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a))
(*.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a))
(*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) a) a)
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 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) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))
(*.f64 a (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) a))
(pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a)) #s(literal 2 binary64)))
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) b)
(*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))
(*.f64 (fabs.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b)) (fabs.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b)))
(*.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b)) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b)))
(*.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b) #s(literal 1 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b) #s(literal 1 binary64)) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b))
(*.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b))
(*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) b) b)
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 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) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))
(*.f64 b (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) b))
(pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) b)) #s(literal 2 binary64)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) a)) a) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (*.f64 b b)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))
(/.f64 (-.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)) #s(literal 2 binary64))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))))
(/.f64 (-.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 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) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) a)) a))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) a)) a)))
(/.f64 (-.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) #s(literal 2 binary64)) (*.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))) (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 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) angle) #s(literal 1/90 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) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)) (*.f64 (neg.f64 (*.f64 b b)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)) #s(literal 2 binary64)) (*.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b))) (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b))))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)) (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 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 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)) #s(literal 2 binary64)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 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) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) a)) a) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 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) angle) #s(literal 1/90 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) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) a)) a)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) a)) a)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) #s(literal 2 binary64)) (+.f64 (*.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))) (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 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) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 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) angle) #s(literal 1/90 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) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)) (*.f64 (neg.f64 (*.f64 b b)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)) #s(literal 2 binary64)) (+.f64 (*.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b))) (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)) (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 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 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)) #s(literal 2 binary64)) (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) #s(literal 2 binary64))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 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 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)) #s(literal 3 binary64)) (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) #s(literal 2 binary64)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b))))))
(-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) a)) a))
(-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))))
(-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)) (*.f64 (neg.f64 (*.f64 b b)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))
(-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)) (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b))))
(+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))
(+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)))
(*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (+.f64 b a) (-.f64 b a)))
(*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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 y-scale (/.f64 (*.f64 a a) 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 (/.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 x-scale (/.f64 (*.f64 b b) 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 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 #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 (*.f64 (*.f64 b (/.f64 b (*.f64 x-scale x-scale))) y-scale) (/.f64 (*.f64 a a) y-scale)) y-scale)
(/.f64 (-.f64 (*.f64 (*.f64 b (/.f64 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 b (/.f64 b (*.f64 x-scale x-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) (*.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 (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)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 y-scale y-scale) (-.f64 (*.f64 (*.f64 b (/.f64 b (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale)) (*.f64 a a))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-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 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 (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))))) (/.f64 #s(literal 1/2 binary64) #s(literal 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))))) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(*.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))))
(/.f64 #s(literal 1 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)))
(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 (-.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))))))
(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 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))
(*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (PI.f64)) angle)
(*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) angle))
(*.f64 (PI.f64) (*.f64 angle (*.f64 (+.f64 b a) (-.f64 b a))))
(*.f64 angle (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (PI.f64)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.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 b (/.f64 b (*.f64 x-scale x-scale))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.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 #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 (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) x-scale) (/.f64 (*.f64 b b) 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))))) (neg.f64 (*.f64 x-scale x-scale))) (neg.f64 (*.f64 b b))) (neg.f64 (*.f64 x-scale x-scale)))
(/.f64 (-.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 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 (*.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 #s(literal 1 binary64) (/.f64 (*.f64 x-scale x-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 (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 (*.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 (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 #s(literal 1 binary64) (/.f64 (neg.f64 (+.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 a (/.f64 a (*.f64 y-scale y-scale))))) (*.f64 a (/.f64 a (*.f64 y-scale y-scale))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.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 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 #s(literal 1 binary64) (/.f64 (+.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 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)))))) x-scale) (/.f64 (*.f64 b b) x-scale)) x-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)))))) (neg.f64 (*.f64 x-scale x-scale))) (neg.f64 (*.f64 b b))) (neg.f64 (*.f64 x-scale x-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 x-scale x-scale)) (*.f64 b b)) (*.f64 x-scale x-scale))
(/.f64 (-.f64 (*.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 x-scale x-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 x-scale x-scale))
(/.f64 (-.f64 (*.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 a (/.f64 a (*.f64 y-scale y-scale)))) (*.f64 (neg.f64 (+.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))))))) (neg.f64 (+.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 a (/.f64 a (*.f64 y-scale y-scale))) (neg.f64 (+.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 (*.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 (*.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))))))) #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 (*.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))))))) (neg.f64 (+.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 a (/.f64 a (*.f64 y-scale y-scale))) (neg.f64 (+.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 (-.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 y-scale y-scale) (*.f64 x-scale x-scale)))
(/.f64 (-.f64 (*.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 a (/.f64 a (*.f64 y-scale y-scale)))) (*.f64 (+.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 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 a (/.f64 a (*.f64 y-scale y-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 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) #s(literal 3 binary64)) (pow.f64 (+.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)))))) #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 (*.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 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 a (/.f64 a (*.f64 y-scale y-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))))))))))
(neg.f64 (-.f64 (+.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 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 (*.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 a (/.f64 a (*.f64 y-scale y-scale))) (neg.f64 (+.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 (*.f64 a (/.f64 a (*.f64 y-scale y-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))))))) y-scale)
(*.f64 y-scale (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-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 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-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 b a) (-.f64 b a))) (/.f64 y-scale (*.f64 (PI.f64) angle)))
(*.f64 (/.f64 y-scale (*.f64 (PI.f64) angle)) (/.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-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 b a) (-.f64 b a))))
(*.f64 (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (PI.f64))) (/.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-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))))))) angle))
(*.f64 (/.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-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 (+.f64 b a) (-.f64 b a)) (PI.f64))) (/.f64 y-scale angle))
(*.f64 (/.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-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))))))) angle) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (PI.f64))))
(*.f64 (/.f64 y-scale (PI.f64)) (/.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-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 angle (*.f64 (+.f64 b a) (-.f64 b a)))))
(*.f64 (/.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-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))))))) (PI.f64)) (/.f64 y-scale (*.f64 angle (*.f64 (+.f64 b a) (-.f64 b a)))))
(*.f64 (/.f64 y-scale angle) (/.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-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 (+.f64 b a) (-.f64 b a)) (PI.f64))))
(*.f64 (/.f64 y-scale (*.f64 (+.f64 b a) (-.f64 b a))) (/.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-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 (PI.f64) angle)))
(*.f64 (/.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-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 (PI.f64) angle)) (/.f64 y-scale (*.f64 (+.f64 b a) (-.f64 b a))))
(*.f64 (*.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-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))))))) y-scale) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))))
(*.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-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 y-scale (*.f64 (*.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))) (+.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))))))) y-scale) (*.f64 (PI.f64) angle))) (neg.f64 (*.f64 (+.f64 b a) (-.f64 b a))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-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))))))) y-scale))) (neg.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a))))))
(/.f64 (/.f64 (*.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-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))))))) y-scale) (*.f64 (PI.f64) angle)) (*.f64 (+.f64 b a) (-.f64 b a)))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-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))))))) y-scale)) (neg.f64 (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))))
(/.f64 (*.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-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))))))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (*.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-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))))))) y-scale) (*.f64 (PI.f64) 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 (*.f64 a (/.f64 a (*.f64 y-scale y-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))))))) y-scale))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-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))))))) y-scale)))
(*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (PI.f64) angle)) (/.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-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 b a) (-.f64 b a))))
(*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (PI.f64))) (/.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-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))))))) angle))
(*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (/.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-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 (PI.f64) angle)))
(*.f64 (/.f64 (*.f64 x-scale y-scale) (PI.f64)) (/.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-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 angle (*.f64 (+.f64 b a) (-.f64 b a)))))
(*.f64 (/.f64 (*.f64 x-scale y-scale) angle) (/.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-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 (+.f64 b a) (-.f64 b a)) (PI.f64))))
(*.f64 (/.f64 (*.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-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))))))) y-scale) (PI.f64)) (/.f64 x-scale (*.f64 angle (*.f64 (+.f64 b a) (-.f64 b a)))))
(*.f64 (/.f64 (*.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-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))))))) 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 (*.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-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))))))) y-scale) (*.f64 (+.f64 b a) (-.f64 b a))))
(*.f64 (/.f64 (*.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-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))))))) 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 a (/.f64 a (*.f64 y-scale y-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))))))) y-scale) angle))
(*.f64 (/.f64 x-scale (*.f64 (+.f64 b a) (-.f64 b a))) (/.f64 (*.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-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))))))) y-scale) (*.f64 (PI.f64) angle)))
(*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-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))))))) y-scale) (*.f64 angle (*.f64 (+.f64 b a) (-.f64 b a)))))
(*.f64 (/.f64 (*.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-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))))))) 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 a (/.f64 a (*.f64 y-scale y-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))))))) y-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (PI.f64))))
(*.f64 (/.f64 (*.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-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))))))) y-scale) (*.f64 (PI.f64) angle)) (/.f64 x-scale (*.f64 (+.f64 b a) (-.f64 b a))))
(*.f64 (*.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-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 y-scale (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a))))) x-scale)
(*.f64 x-scale (*.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-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 y-scale (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a))))))
(/.f64 (neg.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-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))))))))) (neg.f64 (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))))
(/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-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 (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 (*.f64 x-scale y-scale) (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-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 (pow.f64 (pow.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (sqrt.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))))
(*.f64 (pow.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))) #s(literal 1/2 binary64)) (pow.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))) #s(literal 1/2 binary64)))
(pow.f64 (pow.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))) #s(literal 2 binary64)) #s(literal 1/2 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))) #s(literal 2 binary64)))
(fabs.f64 (neg.f64 (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))))))
(fabs.f64 (-.f64 (*.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) a)) a) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b))))
(fabs.f64 (-.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b))))
(fabs.f64 (neg.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))))))
(fabs.f64 (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))))
(fabs.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))))
(fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))))
(exp.f64 (*.f64 (log.f64 (pow.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (+.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))))) (+.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)) (+.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b))))) (+.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))))) (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))) (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))))) (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))))
(/.f64 (-.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))) (+.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) #s(literal 2 binary64))) (-.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b))))
(/.f64 (-.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b))) (+.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)))) (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)) #s(literal 2 binary64))) (-.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))))
(/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))) #s(literal 2 binary64))) (-.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))) (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))))))
(/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))) #s(literal 2 binary64))) (+.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))))))
(/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))) #s(literal 2 binary64))) (-.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))))
(/.f64 (+.f64 (pow.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))) #s(literal 3 binary64)) (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) #s(literal 3 binary64))) (+.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))) (+.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (-.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) #s(literal 2 binary64)) (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b))))))
(/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))) #s(literal 3 binary64)) (pow.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))) #s(literal 2 binary64)) (-.f64 (pow.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))) #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))) (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))))))))
(/.f64 (+.f64 (pow.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b))) #s(literal 3 binary64)) (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)) #s(literal 3 binary64))) (+.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b))) (+.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)))) (-.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)) #s(literal 2 binary64)) (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))))))
(/.f64 (-.f64 (pow.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 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) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))) #s(literal 2 binary64)) (+.f64 (pow.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))) #s(literal 2 binary64)) (*.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))))))))
(/.f64 (+.f64 (pow.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))) #s(literal 2 binary64)) (-.f64 (pow.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))) #s(literal 2 binary64)) (*.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))))))
(-.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))))
(+.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)))
(+.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))
(+.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))))
(+.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))) (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))))
(*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale)
(*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))
(*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))
(*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (+.f64 b a) (-.f64 b a))))
(*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (+.f64 b a) (-.f64 b a))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) x-scale)
(*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale))
(*.f64 x-scale (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (+.f64 b a) (-.f64 b a))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (/.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (/.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(/.f64 (+.f64 (*.f64 (/.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(/.f64 (+.f64 (*.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (*.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(/.f64 (-.f64 (*.f64 (/.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (/.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (*.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (-.f64 (/.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))
(/.f64 (+.f64 (pow.f64 (/.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (/.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (*.f64 (/.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))))
(/.f64 (+.f64 (*.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))))) (*.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(/.f64 (neg.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale))) (neg.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (+.f64 b a) (-.f64 b a)))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))))) (neg.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))
(/.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale)) (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (+.f64 b a) (-.f64 b a))))
(/.f64 (neg.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))))) (neg.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (+.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (+.f64 b a) (-.f64 b a))) (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (neg.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))))))
(-.f64 (/.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (/.f64 (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(+.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(+.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(+.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (/.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(+.f64 (/.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(*.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 y-scale (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(*.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 y-scale (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale)))
(*.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) x-scale) (/.f64 y-scale (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (+.f64 b a) (-.f64 b a))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(*.f64 (/.f64 y-scale (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(*.f64 (/.f64 y-scale (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (+.f64 b a) (-.f64 b a))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) x-scale))
(*.f64 (/.f64 y-scale (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale)))
(*.f64 (/.f64 y-scale (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale)) (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (+.f64 b a) (-.f64 b a)))))
(*.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale)) (/.f64 y-scale (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (+.f64 b a) (-.f64 b a)))))
(*.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (+.f64 b a) (-.f64 b a))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (/.f64 y-scale x-scale))
(*.f64 (/.f64 y-scale x-scale) (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (+.f64 b a) (-.f64 b a))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(*.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) y-scale)
(*.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) y-scale) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(*.f64 y-scale (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(/.f64 (neg.f64 (/.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) y-scale) x-scale)) (neg.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (+.f64 b a) (-.f64 b a))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) y-scale))) (neg.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))
(/.f64 (/.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) y-scale) x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (+.f64 b a) (-.f64 b a))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(/.f64 (neg.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) y-scale)) (neg.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(/.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) y-scale) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (+.f64 b a) (-.f64 b a))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (/.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) y-scale) x-scale)))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (neg.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) y-scale))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) y-scale)))
(+.f64 (/.f64 (*.f64 y-scale (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (/.f64 (*.f64 y-scale (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(+.f64 (/.f64 (*.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) y-scale) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (/.f64 (*.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))) y-scale) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(*.f64 (/.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) y-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(*.f64 (/.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale)) (/.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) y-scale) (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (+.f64 b a) (-.f64 b a)))))
(*.f64 (/.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (+.f64 b a) (-.f64 b a))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (/.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) y-scale) x-scale))
(*.f64 (/.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) y-scale) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) 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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) y-scale) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (+.f64 b a) (-.f64 b a))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(*.f64 (*.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) y-scale) #s(literal -1/2 binary64))
(*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) y-scale))
(*.f64 y-scale (*.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal -1/2 binary64)))
(/.f64 (neg.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) y-scale))) (neg.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) y-scale)) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.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 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) y-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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) y-scale) #s(literal -1/2 binary64))))
(*.f64 (PI.f64) (/.f64 #s(literal 1 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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) y-scale) #s(literal -1/2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (PI.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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) y-scale) #s(literal -1/2 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 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) y-scale) #s(literal -1/2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) y-scale) #s(literal -1/2 binary64)))) (PI.f64)))
(/.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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) y-scale) #s(literal -1/2 binary64)))))
(*.f64 (pow.f64 (/.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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) y-scale) #s(literal -1/2 binary64))))) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))) (pow.f64 (/.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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) y-scale) #s(literal -1/2 binary64))))) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))))
(*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) (pow.f64 (/.f64 #s(literal 1 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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) y-scale) #s(literal -1/2 binary64))))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) y-scale) #s(literal -1/2 binary64)))))
(*.f64 #s(literal 1 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) y-scale) #s(literal -1/2 binary64)))) (PI.f64)))
(pow.f64 (/.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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) y-scale) #s(literal -1/2 binary64))))) #s(literal -1 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 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) y-scale) #s(literal -1/2 binary64))))) (neg.f64 (PI.f64)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) y-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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) y-scale) #s(literal -1/2 binary64)))) (PI.f64))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (/.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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) y-scale) #s(literal -1/2 binary64)))))) #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) y-scale) #s(literal -1/2 binary64))))))))
(/.f64 #s(literal 1 binary64) (pow.f64 (/.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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) y-scale) #s(literal -1/2 binary64))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) y-scale) #s(literal -1/2 binary64))))) #s(literal 1 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 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) y-scale) #s(literal -1/2 binary64))))))
(exp.f64 (*.f64 (log.f64 (/.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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) y-scale) #s(literal -1/2 binary64)))))) #s(literal -1 binary64)))
(*.f64 (*.f64 #s(literal 90 binary64) x-scale) (*.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-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 y-scale (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a))))))
(*.f64 (*.f64 (*.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-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 y-scale (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a))))) x-scale) #s(literal 90 binary64))
(*.f64 #s(literal 90 binary64) (*.f64 (*.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-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 y-scale (*.f64 (*.f64 (PI.f64) angle) (*.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 #s(literal 90 binary64) x-scale) (*.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-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 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 (*.f64 #s(literal 90 binary64) x-scale) (*.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-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 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 (*.f64 #s(literal 90 binary64) x-scale) (*.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-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 y-scale (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))))))) (/.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 a (/.f64 a (*.f64 y-scale y-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 y-scale (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))))))))) (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 a (/.f64 a (*.f64 y-scale y-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 y-scale (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a))))))))) (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 #s(literal 90 binary64) x-scale) (*.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-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 y-scale (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))))))) (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 #s(literal 90 binary64) x-scale) (*.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-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 y-scale (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))))))))))
(/.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 a (/.f64 a (*.f64 y-scale y-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 y-scale (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a))))))))))
(*.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 a (/.f64 a (*.f64 y-scale y-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 y-scale (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))))))) (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 a (/.f64 a (*.f64 y-scale y-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 y-scale (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))))))) (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 a (/.f64 a (*.f64 y-scale y-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 y-scale (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))))))) (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 a (/.f64 a (*.f64 y-scale y-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 y-scale (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))))))))) (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 a (/.f64 a (*.f64 y-scale y-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 y-scale (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a))))))))) (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 #s(literal 90 binary64) x-scale) (*.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-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 y-scale (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))))))))))
(*.f64 (/.f64 #s(literal 180 binary64) (PI.f64)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) y-scale) #s(literal -1/2 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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) y-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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) y-scale) #s(literal -1/2 binary64)))) (PI.f64)))
(/.f64 #s(literal -180 binary64) (neg.f64 (/.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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) y-scale) #s(literal -1/2 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) y-scale) #s(literal -1/2 binary64))))) #s(literal 180 binary64)))
(/.f64 #s(literal 180 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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) y-scale) #s(literal -1/2 binary64))))))
(*.f64 (pow.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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64))) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64))) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(pow.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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64))) #s(literal 1/2 binary64))
(/.f64 #s(literal 1 binary64) (pow.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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64))) #s(literal -1/2 binary64)))
(sqrt.f64 (*.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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) (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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64))))))
(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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64))))
(fabs.f64 (neg.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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64))))))
(fabs.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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))))
(exp.f64 (*.f64 (log.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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) #s(literal 1/2 binary64)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (+.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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))))) (+.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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))))) (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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))) (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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))))) (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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))))
(/.f64 (-.f64 (*.f64 (+.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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))) (+.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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) #s(literal 2 binary64))) (-.f64 (+.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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b))))
(/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))) #s(literal 2 binary64)) (*.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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) (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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))))) (-.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))) (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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64))))))
(/.f64 (+.f64 (pow.f64 (+.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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))) #s(literal 3 binary64)) (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) #s(literal 3 binary64))) (+.f64 (*.f64 (+.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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))) (+.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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (-.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) #s(literal 2 binary64)) (*.f64 (+.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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b))))))
(/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))) #s(literal 3 binary64)) (pow.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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))) #s(literal 2 binary64)) (-.f64 (*.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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) (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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64))))) (*.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))) (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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64))))))))
(/.f64 (-.f64 (pow.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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) #s(literal 3 binary64)) (pow.f64 (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) #s(literal 3 binary64))) (+.f64 (*.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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) (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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64))))) (+.f64 (pow.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))) #s(literal 2 binary64)) (*.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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))))))))
(/.f64 (-.f64 (*.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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) (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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64))))) (pow.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))) #s(literal 2 binary64))) (+.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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))))))
(/.f64 (-.f64 (*.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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) (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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64))))) (pow.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))) #s(literal 2 binary64))) (-.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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))))
(/.f64 (+.f64 (pow.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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))) #s(literal 3 binary64))) (+.f64 (*.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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) (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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64))))) (-.f64 (pow.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))) #s(literal 2 binary64)) (*.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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))))))
(-.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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))))
(+.f64 (+.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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)))
(+.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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))))
(+.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))) (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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 y-scale (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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64))))))) (*.f64 y-scale (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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64))))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))) 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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) 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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) y-scale))
(*.f64 (+.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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) y-scale)
(*.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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))))
(/.f64 (-.f64 (*.f64 (*.f64 y-scale (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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64))))) (*.f64 y-scale (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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))))) (*.f64 (*.f64 y-scale (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 y-scale (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))))) (-.f64 (*.f64 y-scale (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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64))))) (*.f64 y-scale (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))))))
(/.f64 (-.f64 (*.f64 (*.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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) 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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) y-scale)) (*.f64 (*.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))) y-scale) (*.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))) y-scale))) (-.f64 (*.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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) y-scale) (*.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))) y-scale)))
(/.f64 (+.f64 (pow.f64 (*.f64 y-scale (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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64))))) #s(literal 3 binary64)) (pow.f64 (*.f64 y-scale (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 y-scale (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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64))))) (*.f64 y-scale (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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))))) (-.f64 (*.f64 (*.f64 y-scale (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 y-scale (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))))) (*.f64 (*.f64 y-scale (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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64))))) (*.f64 y-scale (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))))))))
(/.f64 (+.f64 (pow.f64 (*.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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) y-scale) #s(literal 3 binary64)) (pow.f64 (*.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))) y-scale) #s(literal 3 binary64))) (+.f64 (*.f64 (*.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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) 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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) y-scale)) (-.f64 (*.f64 (*.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))) y-scale) (*.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))) y-scale)) (*.f64 (*.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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) y-scale) (*.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))) y-scale)))))
(+.f64 (*.f64 y-scale (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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64))))) (*.f64 y-scale (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))))
(+.f64 (*.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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) y-scale) (*.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))) y-scale))
(*.f64 (/.f64 (+.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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 y-scale (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(*.f64 (/.f64 (+.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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 y-scale (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale)))
(*.f64 (/.f64 (+.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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) x-scale) (/.f64 y-scale (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (+.f64 b a) (-.f64 b a))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(*.f64 (/.f64 (+.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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale)) (/.f64 y-scale (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (+.f64 b a) (-.f64 b a)))))
(*.f64 (/.f64 y-scale (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (+.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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(*.f64 (/.f64 y-scale (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (+.f64 b a) (-.f64 b a))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (/.f64 (+.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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) x-scale))
(*.f64 (/.f64 y-scale (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (+.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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale)))
(*.f64 (/.f64 y-scale (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale)) (/.f64 (+.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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (+.f64 b a) (-.f64 b a)))))
(*.f64 (/.f64 (+.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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (+.f64 b a) (-.f64 b a))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (/.f64 y-scale x-scale))
(*.f64 (/.f64 y-scale x-scale) (/.f64 (+.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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (+.f64 b a) (-.f64 b a))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(*.f64 (*.f64 (+.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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) y-scale) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(*.f64 y-scale (/.f64 (+.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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(/.f64 (neg.f64 (/.f64 (*.f64 (+.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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) y-scale) x-scale)) (neg.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (+.f64 b a) (-.f64 b a))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (+.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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) y-scale))) (neg.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))
(/.f64 (/.f64 (*.f64 (+.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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) y-scale) x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (+.f64 b a) (-.f64 b a))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(/.f64 (neg.f64 (*.f64 (+.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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) y-scale)) (neg.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(/.f64 (*.f64 (+.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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) y-scale) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (+.f64 b a) (-.f64 b a))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (/.f64 (*.f64 (+.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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) y-scale) x-scale)))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (neg.f64 (*.f64 (+.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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) y-scale))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (+.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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) y-scale)))
(+.f64 (/.f64 (*.f64 y-scale (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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64))))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (/.f64 (*.f64 y-scale (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(+.f64 (/.f64 (*.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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) y-scale) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (/.f64 (*.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a))) y-scale) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(*.f64 (/.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (*.f64 (+.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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) y-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(*.f64 (/.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale)) (/.f64 (*.f64 (+.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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) y-scale) (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (+.f64 b a) (-.f64 b a)))))
(*.f64 (/.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (+.f64 b a) (-.f64 b a))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (/.f64 (*.f64 (+.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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) y-scale) x-scale))
(*.f64 (/.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (*.f64 (+.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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) y-scale) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale)))
(*.f64 (/.f64 #s(literal -1/2 binary64) x-scale) (/.f64 (*.f64 (+.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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) y-scale) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (+.f64 b a) (-.f64 b a))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(*.f64 (*.f64 y-scale (/.f64 (+.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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))
(*.f64 #s(literal -1/2 binary64) (*.f64 y-scale (/.f64 (+.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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))
(/.f64 (neg.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) y-scale))) (neg.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) y-scale)) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (+.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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.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 (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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #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 (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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #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 (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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #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 (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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #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 (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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 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 (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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (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 (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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #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 (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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))))))
(*.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 (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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #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 y-scale (/.f64 (+.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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #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 (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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #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 (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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #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 (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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #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 (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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/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)) #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 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) y-scale) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #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)) #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 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) y-scale) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #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)) #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 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) y-scale) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #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)) #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 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) y-scale) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #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)) #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 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) y-scale) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 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)) #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 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) y-scale) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))))) (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)) #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 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) y-scale) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #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)) #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 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) y-scale) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))))))
(*.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 (* -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 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) y-scale) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #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)) #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 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) y-scale) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #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)) #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 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) y-scale) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #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)) #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 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) y-scale) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #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)) #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 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) y-scale) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #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)) #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 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) y-scale) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 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 x-scale (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))))
(/.f64 (neg.f64 (/.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 x-scale (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale))) angle)) (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (PI.f64))))
(/.f64 (neg.f64 (neg.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 x-scale (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale))))) (neg.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a))))))
(/.f64 (/.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 x-scale (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale))) angle) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (PI.f64)))
(/.f64 (neg.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 x-scale (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)))) (neg.f64 (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))))
(/.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 x-scale (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale))) (*.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 #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 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale))) angle)))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (neg.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 x-scale (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.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 x-scale (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)))))
(*.f64 (/.f64 #s(literal 90 binary64) (*.f64 (PI.f64) angle)) (/.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 x-scale (/.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 #s(literal 90 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (PI.f64))) (/.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 x-scale (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale))) angle))
(*.f64 (/.f64 #s(literal 90 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) (/.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 x-scale (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale))) (*.f64 (PI.f64) angle)))
(*.f64 (/.f64 #s(literal 90 binary64) (PI.f64)) (/.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 x-scale (/.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(literal 90 binary64) angle) (/.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 x-scale (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (PI.f64))))
(*.f64 (/.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 x-scale (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))
(*.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 x-scale (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))))
(/.f64 (neg.f64 (*.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)))))) (*.f64 x-scale (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale))))) (neg.f64 (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))))
(/.f64 (*.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)))))) (*.f64 x-scale (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-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) #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 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 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 #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 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-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 #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 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-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 #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 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-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 #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 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-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 #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 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 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 #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 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-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 (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 #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 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-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 #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 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))))))
(*.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(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 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.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 #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 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-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 #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 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-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 #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 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-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 #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 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-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 #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 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))))))

eval171.0ms (1.6%)

Memory
5.4MiB live, 158.9MiB allocated; 25ms collecting garbage
Compiler

Compiled 183 124 to 15 071 computations (91.8% saved)

prune100.0ms (0.9%)

Memory
-9.1MiB live, 117.2MiB allocated; 10ms collecting garbage
Pruning

59 alts after pruning (59 fresh and 0 done)

PrunedKeptTotal
New1 451551 506
Fresh31435
Picked505
Done000
Total1 487591 546
Accuracy
81.9%
Counts
1 546 → 59
Alt Table
Click to see full alt table
StatusAccuracyProgram
12.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 #s(literal 90 binary64) x-scale) (*.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-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 y-scale (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a))))))))) (PI.f64))
34.7%
(/.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)) #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 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) y-scale) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))))))))
34.7%
(*.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 (* -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 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) y-scale) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))))) (PI.f64)) #s(literal 180 binary64))
3.1%
(*.f64 #s(approx 180 #s(literal 0 binary64)) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (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 b) (*.f64 a a)))))))) (PI.f64)))
7.8%
(*.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)))
6.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 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)))))) (*.f64 x-scale (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))))) (PI.f64)))
6.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 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a))) (*.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)))))) (*.f64 x-scale (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)))))))) (PI.f64)))
7.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 90 binary64) (*.f64 (PI.f64) angle)) (/.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 x-scale (/.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)))
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 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-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 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a))))))) (PI.f64)))
2.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 (*.f64 y-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 y-scale y-scale) (*.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)))
6.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 #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)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) angle)))))) (PI.f64)))
6.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 #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)) (*.f64 angle (*.f64 (PI.f64) #s(approx (- (pow b 2) (pow a 2)) (pow.f64 b #s(literal 2 binary64))))))))) (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 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)))
9.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 (*.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-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))))))) y-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (/.f64 x-scale (*.f64 (PI.f64) angle)))))) (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)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (/.f64 (*.f64 a a) y-scale) y-scale) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (/.f64 (*.f64 a a) y-scale) y-scale))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (-.f64 (*.f64 b b) (*.f64 a a)))))))) (PI.f64)))
10.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 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a 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))))) x-scale) (/.f64 (*.f64 b b) x-scale)) x-scale)) y-scale) (*.f64 (*.f64 (PI.f64) angle) (-.f64 (*.f64 b b) (*.f64 a a)))))))) (PI.f64)))
9.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 b (/.f64 b (*.f64 x-scale x-scale))) y-scale) (/.f64 (*.f64 a a) y-scale)) y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (-.f64 (*.f64 b b) (*.f64 a a)))))))) (PI.f64)))
7.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 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (/.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 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (-.f64 (*.f64 b b) (*.f64 a a)))))))) (PI.f64)))
12.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 x-scale (/.f64 (*.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-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))))))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))))))) (PI.f64)))
2.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 #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)) (*.f64 (*.f64 (PI.f64) angle) (-.f64 (*.f64 b b) (*.f64 a a)))))))) (PI.f64)))
14.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 a (/.f64 a (*.f64 y-scale y-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 (+.f64 b a) (-.f64 b a)) (PI.f64))) (/.f64 y-scale angle)))))) (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)) (*.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 b) (* a a)))) (/.f64 #s(literal -1 binary64) (*.f64 angle (*.f64 y-scale (PI.f64))))))))) (PI.f64)))
34.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 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 b) (* a a)))) (*.f64 #s(literal -1 binary64) (/.f64 y-scale (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (PI.f64)))))))))) (PI.f64)))
20.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)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (/.f64 (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)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (/.f64 (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.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 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 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) #s(literal 4 binary64))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) (*.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (PI.f64)))
19.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 #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))) (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) 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)))
20.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 #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 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (/.f64 (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)))))))))) (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) (/.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)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64)) (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)))
13.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))) (exp.f64 (*.f64 (log.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) 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)))
17.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 #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 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)))))) (*.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)))
19.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 #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 (exp.f64 (*.f64 (log.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)))
23.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 (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)))
20.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 #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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 y-scale (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (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 -1/2 binary64) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (+.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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)))
39.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 #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)))
8.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 (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (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)))
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)) #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)))
30.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 (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a a)))))) (*.f64 #s(literal -90 binary64) (/.f64 y-scale (*.f64 angle (*.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 b) (* a a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))))) (PI.f64)))
36.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)) #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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (/.f64 (*.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) y-scale) x-scale))))) (PI.f64)))
14.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 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 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 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))))) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #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)))
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)) #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 (*.f64 (PI.f64) angle) #s(literal 180 binary64))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (/.f64 (*.f64 (PI.f64) angle) #s(literal 180 binary64))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (/.f64 (*.f64 (PI.f64) angle) #s(literal 180 binary64))) (sin.f64 (/.f64 (*.f64 (PI.f64) angle) #s(literal 180 binary64)))))))))) (PI.f64)))
40.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 (* -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 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle))))))))))) (PI.f64)))
39.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 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 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 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (PI.f64)))
26.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 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 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 (-.f64 (cos.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64)) (PI.f64)) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (cos.f64 (+.f64 (/.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64)) (PI.f64)) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 2 binary64)))))))) (PI.f64)))
41.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 (* -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 (sin.f64 (/.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64)) (PI.f64)) #s(literal 2 binary64))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64)))
40.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)) #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 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (/.f64 (PI.f64) #s(literal 2 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)) #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 #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)))
35.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 (* -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)))) #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)))))))))) (PI.f64)))
40.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)) #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) #s(approx (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (*.f64 angle (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 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/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal -1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (*.f64 x-scale (PI.f64)))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #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)))))) (*.f64 x-scale (pow.f64 (PI.f64) #s(literal 2 binary64)))))))))))))) (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)) #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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 angle (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale (PI.f64)))))))) (PI.f64)))
22.2%
(*.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)) (*.f64 (/.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) y-scale) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale))))))))
26.4%
(*.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)) (*.f64 (*.f64 y-scale (/.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) angle) #s(literal 1/90 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) (/.f64 (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) (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))))))
25.1%
(*.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)) (*.f64 (*.f64 y-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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* (cos (* (* (* (PI) angle) 1/180) 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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))))))
26.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)) (*.f64 (*.f64 y-scale (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (* (* (* (PI) angle) 1/180) 2))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))))))
37.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)) (*.f64 (*.f64 y-scale #s(approx (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (- (* b b) (* a a)) (sin (* (* (PI) angle) 1/180))))) (/.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 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) #s(literal -1/2 binary64)))))))
32.1%
(*.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)) (*.f64 (*.f64 y-scale #s(approx (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (- (* b b) (* a a)) (sin (* (* (PI) angle) 1/180))))) (*.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 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) #s(literal -1/2 binary64)))))))
37.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)) (*.f64 #s(approx (* y-scale (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (- (* b b) (* a a)) (sin (* (* (PI) angle) 1/180)))))) (/.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(literal -1/2 binary64)))))))
32.1%
(*.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 (* (* y-scale (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (- (* b b) (* a a)) (sin (* (* (PI) angle) 1/180)))))) -1/2) (*.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))))))))))))))
Compiler

Compiled 6 500 to 1 490 computations (77.1% saved)

series237.0ms (2.2%)

Memory
5.5MiB live, 199.5MiB allocated; 16ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0240370643
Stop Event
iter-limit
Counts
104 → 298
Calls
Call 1
Inputs
#s(literal 180 binary64)
a
angle
(PI.f64)
#s(literal 2 binary64)
b
y-scale
x-scale
#s(literal 1/180 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))))
(pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))
#s(literal 4 binary64)
#s(literal 1/2 binary64)
#s(literal 1 binary64)
(pow.f64 (PI.f64) #s(literal 2 binary64))
(pow.f64 (PI.f64) #s(literal 4 binary64))
#s(literal 1/32400 binary64)
#s(literal 90 binary64)
(*.f64 (PI.f64) angle)
(/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))
(*.f64 a a)
(*.f64 b b)
(*.f64 y-scale y-scale)
(*.f64 x-scale x-scale)
(*.f64 (*.f64 x-scale x-scale) y-scale)
(-.f64 (*.f64 b b) (*.f64 a a))
(cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle))))
(sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle))))
#s(literal -90 binary64)
(pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 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 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64)))
(/.f64 (*.f64 a a) y-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 b) (*.f64 a a)))
(*.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 b) (* a a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64))))))
(*.f64 x-scale (PI.f64))
(*.f64 angle (*.f64 x-scale (PI.f64)))
#s(literal 1/1049760000 binary64)
(*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))
(*.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 #s(literal 1/180 binary64) (*.f64 angle (*.f64 x-scale (PI.f64)))))
(sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))
(+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64))))
(*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64)))))
(*.f64 angle (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64))))))
(/.f64 (*.f64 angle (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale (PI.f64)))
(*.f64 #s(literal 90 binary64) (/.f64 (*.f64 angle (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale (PI.f64))))
#s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 angle (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale (PI.f64)))))
(*.f64 (*.f64 b b) y-scale)
(*.f64 (*.f64 x-scale x-scale) (/.f64 (*.f64 a a) y-scale))
(-.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 x-scale x-scale) (/.f64 (*.f64 a a) 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))
(pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) #s(literal 4 binary64))
(sqrt.f64 (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) #s(literal 4 binary64)))
(pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) #s(literal 2 binary64))
(+.f64 (sqrt.f64 (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) #s(literal 2 binary64)))
(*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) #s(literal 2 binary64))))
(*.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))))
(*.f64 x-scale (*.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle))))))
(/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))))))
(*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) 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 1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) 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)) #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 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.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)) #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 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.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)) #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 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.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)) #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 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle))))))))))) (PI.f64)))
(fabs.f64 (/.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 (fabs.f64 (/.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 b b) (*.f64 x-scale x-scale)))
(-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (/.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 b b) (*.f64 x-scale x-scale))))
(*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (/.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 b b) (*.f64 x-scale x-scale)))) y-scale)
(/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (/.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 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (-.f64 (*.f64 b b) (*.f64 a a))))
(*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (/.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 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (-.f64 (*.f64 b b) (*.f64 a 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 (*.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 b b) (*.f64 x-scale x-scale)))) y-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 #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 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 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (-.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 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (/.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 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (-.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 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (/.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 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (-.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 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (/.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 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (-.f64 (*.f64 b b) (*.f64 a a)))))))) (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 b) (* a 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 b) (* a 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 b) (* a 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 b) (* a a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))))) (PI.f64)))
(/.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)))) #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))))))
(*.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)))) #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 (* -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)))) #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 (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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)))) #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)))))))))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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)))) #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))))))))))
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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)))) #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)))))))))) (PI.f64))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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)))) #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)))))))))) (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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 angle (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-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 (* -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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 angle (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-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 (* -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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 angle (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-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 (* -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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 angle (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (*.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 (* -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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 angle (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale (PI.f64)))))))) (PI.f64)))
Outputs
#s(approx 180 #s(literal 0 binary64))
#s(approx a a)
#s(approx (* a a) (pow.f64 a #s(literal 2 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 (/ (* a a) y-scale) (/.f64 (pow.f64 a #s(literal 2 binary64)) y-scale))
#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 (* (* (PI) angle) (- (* b b) (* a a))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64))))
#s(approx (* (* (PI) angle) (- (* b b) (* a a))) (+.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 (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a 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 b) (* a 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 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 x-scale (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 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 b) (* a 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 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.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 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 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 x-scale (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (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 b) (* a 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 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.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 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 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 x-scale (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64)))))) (pow.f64 b #s(literal 4 binary64)))) (*.f64 #s(literal 90 binary64) (/.f64 (-.f64 (/.f64 x-scale (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64))))) (pow.f64 b #s(literal 2 binary64))))))))))
#s(approx (* (* x-scale x-scale) (/ (* a a) y-scale)) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale))
#s(approx (- (* (* b b) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale))
#s(approx (- (* (* b b) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale)))
#s(approx (/ (- (* (* b b) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale)) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (/ (- (* (* b b) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-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 (* -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 (fabs (/ (- (* (* b b) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))))
#s(approx (+ (fabs (/ (- (* (* b b) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale))) (+.f64 (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))) (/.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) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (+.f64 (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))) (/.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) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-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 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))) (/.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) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))) (/.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) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-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 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))) (/.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 (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (/ (- (* (* b b) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a a)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))) (/.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) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a a)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))) (/.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 1 binary64) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))) (/.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) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a a)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))) (/.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 #s(literal 1 binary64) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))) (/.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 y-scale (+.f64 (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))) (/.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) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a a)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))) (/.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 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))) (/.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 4 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))) (/.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 y-scale (+.f64 (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))) (/.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) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a a))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))) (/.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) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a a))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))) (/.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 x-scale (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))) (/.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) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a a))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))) (/.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 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 x-scale (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))) (/.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 (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))) (/.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) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a a))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))) (/.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 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 x-scale (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))) (/.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 4 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 x-scale (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))) (/.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 x-scale (*.f64 y-scale (+.f64 (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))) (/.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) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a a)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))) (/.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) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a a)))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))) (/.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 x-scale (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))) (/.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) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a a)))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))) (/.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 x-scale (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))) (/.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 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 x-scale (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))) (/.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 (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (/ (- (* (* b b) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a a)))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))) (/.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 x-scale (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))) (/.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 x-scale (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))) (/.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 4 binary64)))) (*.f64 #s(literal 90 binary64) (/.f64 (-.f64 (/.f64 x-scale (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))) (/.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 (- (* 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 (* (* (PI) angle) (- (* b b) (* a a))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64)))))
#s(approx (* (* (PI) angle) (- (* b b) (* a a))) (*.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 (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a 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 b) (* a a)))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.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 (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 b) (* a 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 (pow.f64 b #s(literal 2 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 (pow.f64 b #s(literal 2 binary64)) x-scale) (*.f64 angle (*.f64 y-scale (PI.f64)))))) (pow.f64 a #s(literal 4 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 (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 b) (* a 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 (pow.f64 b #s(literal 2 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 (pow.f64 b #s(literal 2 binary64)) x-scale) (*.f64 angle (*.f64 y-scale (PI.f64)))))) (pow.f64 a #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 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 (pow.f64 b #s(literal 2 binary64)) x-scale) (*.f64 angle (*.f64 y-scale (PI.f64)))))) (pow.f64 a #s(literal 6 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 (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 (- (* (* b b) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)))
#s(approx (- (* (* b b) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (pow.f64 a #s(literal 2 binary64))) (/.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))))
#s(approx (/ (- (* (* b b) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-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) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-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 (* -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 (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (/ (- (* (* b b) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-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 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))) (/.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) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-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 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))) (/.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 (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (/ (- (* (* b b) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a a)))) (/.f64 #s(literal -1 binary64) (*.f64 angle (*.f64 y-scale (PI.f64)))))
#s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (/ (- (* (* b b) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a a)))) (-.f64 (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))) (/.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 angle (*.f64 y-scale (PI.f64)))) (/.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) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a a)))) (-.f64 (+.f64 (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))) (/.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 (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 angle (PI.f64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))) (pow.f64 a #s(literal 4 binary64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 angle (*.f64 y-scale (PI.f64)))) (/.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) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a a)))) (-.f64 (+.f64 (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))) (/.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 4 binary64)) (-.f64 (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 angle (PI.f64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 angle (*.f64 y-scale (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 y-scale (+.f64 (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 angle (PI.f64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))) (pow.f64 a #s(literal 4 binary64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 angle (*.f64 y-scale (PI.f64)))) (/.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) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a 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) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a 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 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))) (/.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)) 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) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a a))))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64))))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))) (/.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 (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))) (/.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)) x-scale) (*.f64 angle (*.f64 y-scale (PI.f64)))))) (pow.f64 a #s(literal 4 binary64))))) (/.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) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a a))))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64))))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))) (/.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 4 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))) (/.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)) x-scale) (*.f64 angle (*.f64 y-scale (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 (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))) (/.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)) x-scale) (*.f64 angle (*.f64 y-scale (PI.f64)))))) (pow.f64 a #s(literal 4 binary64)))) (/.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) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a a)))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))) (/.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)) 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) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a 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 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))) (/.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)) x-scale) (*.f64 angle (*.f64 y-scale (PI.f64)))))) (pow.f64 a #s(literal 4 binary64)))) (*.f64 #s(literal 90 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))) (/.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)) 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) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a 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 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))) (/.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)) x-scale) (*.f64 angle (*.f64 y-scale (PI.f64)))))) (pow.f64 a #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))) (/.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)) x-scale) (*.f64 angle (*.f64 y-scale (PI.f64)))))) (pow.f64 a #s(literal 6 binary64)))) (*.f64 #s(literal 90 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))) (/.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)) x-scale) (*.f64 angle (*.f64 y-scale (PI.f64))))) (pow.f64 a #s(literal 2 binary64))))))))
#s(approx b b)
#s(approx (- (* b b) (* a a)) (-.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 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))) (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 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))) (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 #s(literal 90 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 y-scale (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.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 (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 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))) (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 (pow.f64 b #s(literal 2 binary64)) (+.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 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 #s(literal 90 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 y-scale (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.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 (pow.f64 a #s(literal 4 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 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))) (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 (pow.f64 b #s(literal 2 binary64)) (+.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 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 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 y-scale (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.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 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64)))))) (pow.f64 a #s(literal 4 binary64)))) (*.f64 #s(literal 90 binary64) (/.f64 (-.f64 (/.f64 y-scale (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.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 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64))))) (pow.f64 a #s(literal 2 binary64))))))))))
#s(approx (- (* (* b b) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) 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 (*.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 (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (/ (- (* (* b b) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-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 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale)))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (/ (- (* (* b b) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-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 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale)))))
#s(approx (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (/ (- (* (* b b) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-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 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))))))
#s(approx (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (/ (- (* (* b b) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-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 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale)))))))
#s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (/ (- (* (* b b) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* 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))) (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64))))))
#s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (/ (- (* (* b b) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* 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))) (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.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 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64))))))))
#s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (/ (- (* (* b b) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* 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))) (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (+.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 (pow.f64 b #s(literal 2 binary64)) (-.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 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))))) (*.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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64))))))))
#s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (/ (- (* (* b b) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* 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))) (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))))) (*.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 (pow.f64 b #s(literal 2 binary64)) (-.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 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64)))))) (pow.f64 a #s(literal 4 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (-.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 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64))))) (pow.f64 a #s(literal 2 binary64)))))) (/.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 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))))) (*.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) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* 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))) (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale)))))) (*.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) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* 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))) (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 y-scale (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale)))))) (*.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) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* 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))) (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (+.f64 (/.f64 y-scale (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (*.f64 x-scale (PI.f64))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 y-scale (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale)))))) (*.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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale)))))) (*.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) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* 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))) (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale)))))) (*.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 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 y-scale (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64)))))) (pow.f64 a #s(literal 4 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 y-scale (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64))))) (pow.f64 a #s(literal 2 binary64)))))) (/.f64 y-scale (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale)))))) (*.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) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* 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))) (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale)))))) (*.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) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* 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))) (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale)))))) (*.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 y-scale (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale)))))) (*.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) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* 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))) (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale)))))) (*.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 y-scale (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 y-scale (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale)))))) (*.f64 (pow.f64 a #s(literal 4 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) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* 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))) (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale)))))) (*.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 y-scale (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale)))))) (*.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 y-scale (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64)))))) (pow.f64 a #s(literal 4 binary64)))) (*.f64 #s(literal 90 binary64) (/.f64 (-.f64 (/.f64 y-scale (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64))))) (pow.f64 a #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 (* (* (PI) angle) (- (* b b) (* a 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 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 b) (* a 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 b) (* a a)))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 y-scale (*.f64 angle (*.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 (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 b) (* a 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 (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))) (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 (pow.f64 a #s(literal 2 binary64)) y-scale) (*.f64 angle (*.f64 x-scale (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))) (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 (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 b) (* a 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 (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))) (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 (pow.f64 a #s(literal 2 binary64)) y-scale) (*.f64 angle (*.f64 x-scale (PI.f64)))))) (pow.f64 b #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 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))) (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 (pow.f64 a #s(literal 2 binary64)) y-scale) (*.f64 angle (*.f64 x-scale (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))) (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 (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 (- (* (* b b) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 y-scale (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale))))))
#s(approx (/ (- (* (* b b) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-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 (* -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 (+ (fabs (/ (- (* (* b b) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-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 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (/ (- (* (* b b) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-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) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-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 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))) (pow.f64 b #s(literal 2 binary64)))))))
#s(approx (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (/ (- (* (* b b) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-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) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-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 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))))) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (/ (- (* (* b b) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a 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) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a 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 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))))) (*.f64 angle (*.f64 (pow.f64 b #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) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a 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 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64)))) (/.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 y-scale #s(literal 2 binary64))) (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))))) (*.f64 angle (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 4 binary64))))) (/.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) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a 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 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))))) (*.f64 angle (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 6 binary64))))) (+.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 y-scale #s(literal 2 binary64))) (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))))) (*.f64 angle (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 4 binary64)))) (/.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) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a 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) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a 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 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale)))))) (*.f64 angle (*.f64 (pow.f64 b #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 x-scale (PI.f64)))))))
#s(approx (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (/ (- (* (* b b) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a a))))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64)))) (/.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))) (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale)))))) (*.f64 angle (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 4 binary64))))) (/.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) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a a))))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 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))) (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale)))))) (*.f64 angle (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 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))) (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale)))))) (*.f64 angle (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 4 binary64)))) (/.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) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a a)))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 y-scale (*.f64 angle (*.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale)))))) (*.f64 angle (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) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a 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 (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))) (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale)))))) (*.f64 angle (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 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))) (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale)))))) (*.f64 angle (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) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a 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 (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))) (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale)))))) (*.f64 angle (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 4 binary64)))) (+.f64 (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 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))) (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale)))))) (*.f64 angle (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 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))) (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale)))))) (*.f64 angle (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 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 (/ 180 (* (PI) angle)) (/.f64 #s(literal 180 binary64) (*.f64 angle (PI.f64))))
#s(approx (cos (/ 1 (/ 180 (* (PI) angle)))) #s(literal 1 binary64))
#s(approx (cos (/ 1 (/ 180 (* (PI) angle)))) (+.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 (* (PI) angle)))) (+.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 (* (PI) angle)))) (+.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 (sin (* 1/180 (* angle (PI)))) 4) (*.f64 #s(literal 1/1049760000 binary64) (*.f64 (pow.f64 angle #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 4) (*.f64 (pow.f64 angle #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -1/51018336000000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 4) (*.f64 (pow.f64 angle #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/51018336000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/9917964518400000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))) (*.f64 #s(literal 1/16200 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)))))))))))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 4) (*.f64 (pow.f64 angle #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/51018336000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/9917964518400000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))) (+.f64 (*.f64 #s(literal 1/16200 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 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/1574640000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 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 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #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 (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))
#s(approx (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/102036672000000 binary64) (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64))) (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))
#s(approx (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (sqrt.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/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 1/9917964518400000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))) (*.f64 #s(literal 1/16200 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 #s(literal 1/10411482432835584000000000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 12 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))))
#s(approx (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (sqrt.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/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (sqrt.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/2 binary64) (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/1574640000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 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 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #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 #s(literal -1/102036672000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 1/9917964518400000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))) (*.f64 #s(literal 1/16200 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 #s(literal 1/10411482432835584000000000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 12 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/9917964518400000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))) (*.f64 #s(literal 1/16200 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 #s(literal 1/10411482432835584000000000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 12 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))))))
#s(approx (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 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 (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 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/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))))))
#s(approx (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 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 (*.f64 #s(literal -1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (sqrt.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/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 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/9917964518400000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))) (*.f64 #s(literal 1/16200 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 #s(literal 1/10411482432835584000000000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 12 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))))))))))
#s(approx (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 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 (*.f64 #s(literal -1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (sqrt.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/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/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/9917964518400000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))) (*.f64 #s(literal 1/16200 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 #s(literal 1/10411482432835584000000000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 12 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.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/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/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/1574640000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 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 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #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 #s(literal -1/102036672000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 1/9917964518400000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))) (*.f64 #s(literal 1/16200 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 #s(literal 1/10411482432835584000000000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 12 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))))))))))))))
#s(approx (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 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 (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 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/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal -1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))))))
#s(approx (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 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/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal -1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (sqrt.f64 (*.f64 #s(literal 1/1049760000 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/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 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/9917964518400000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))) (*.f64 #s(literal 1/16200 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 #s(literal 1/10411482432835584000000000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 12 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))))))))
#s(approx (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 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/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal -1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (sqrt.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 y-scale (+.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 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/9917964518400000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))) (*.f64 #s(literal 1/16200 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 #s(literal 1/10411482432835584000000000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 12 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (*.f64 #s(literal 1/1049760000 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/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/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/1574640000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 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 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #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 #s(literal -1/102036672000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 1/9917964518400000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))) (*.f64 #s(literal 1/16200 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 #s(literal 1/10411482432835584000000000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 12 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))))))))))
#s(approx (* (* (PI) angle) (- (* b b) (* a a))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))
#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 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))) (+.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))
#s(approx (* angle (* x-scale (PI))) (*.f64 angle (*.f64 x-scale (PI.f64))))
#s(approx (* 1/180 (* angle (* x-scale (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 (* angle (* y-scale (+ (sqrt (* 1/1049760000 (pow (PI) 4))) (* 1/32400 (pow (PI) 2))))) (*.f64 angle (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 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 (/ (* angle (* y-scale (+ (sqrt (* 1/1049760000 (pow (PI) 4))) (* 1/32400 (pow (PI) 2))))) (* x-scale (PI))) (/.f64 (*.f64 angle (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale (PI.f64))))
#s(approx (* 90 (/ (* angle (* y-scale (+ (sqrt (* 1/1049760000 (pow (PI) 4))) (* 1/32400 (pow (PI) 2))))) (* x-scale (PI)))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 angle (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale (PI.f64)))))
#s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 angle (+.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) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal -1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (*.f64 x-scale (PI.f64)))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #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)))))) (*.f64 x-scale (pow.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale (PI.f64)))))))
#s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 angle (+.f64 (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 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 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/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 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/9917964518400000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))) (*.f64 #s(literal 1/16200 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 #s(literal 1/10411482432835584000000000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 12 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (*.f64 #s(literal 1/1049760000 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/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal -1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (*.f64 x-scale (PI.f64)))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #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)))))) (*.f64 x-scale (pow.f64 (PI.f64) #s(literal 2 binary64))))))) (PI.f64))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #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))))))) (*.f64 x-scale (pow.f64 (PI.f64) #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) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal -1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (*.f64 x-scale (PI.f64)))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #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)))))) (*.f64 x-scale (pow.f64 (PI.f64) #s(literal 2 binary64))))))))))))
#s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 angle (+.f64 (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 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 1/2 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal -1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (*.f64 x-scale (PI.f64)))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #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)))))) (*.f64 x-scale (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 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.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/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/1574640000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 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 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #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 #s(literal -1/102036672000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 1/9917964518400000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))) (*.f64 #s(literal 1/16200 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 #s(literal 1/10411482432835584000000000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 12 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (*.f64 #s(literal 1/1049760000 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/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 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/9917964518400000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))) (*.f64 #s(literal 1/16200 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 #s(literal 1/10411482432835584000000000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 12 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (*.f64 #s(literal 1/1049760000 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/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal -1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (*.f64 x-scale (PI.f64)))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #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)))))) (*.f64 x-scale (pow.f64 (PI.f64) #s(literal 2 binary64))))))) (PI.f64))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #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))))))) (*.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/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal -1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (*.f64 x-scale (PI.f64)))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #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)))))) (*.f64 x-scale (pow.f64 (PI.f64) #s(literal 2 binary64))))))) (PI.f64))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #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)))))))) (*.f64 x-scale (pow.f64 (PI.f64) #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/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 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/9917964518400000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))) (*.f64 #s(literal 1/16200 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 #s(literal 1/10411482432835584000000000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 12 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (*.f64 #s(literal 1/1049760000 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/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal -1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (*.f64 x-scale (PI.f64)))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #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)))))) (*.f64 x-scale (pow.f64 (PI.f64) #s(literal 2 binary64))))))) (PI.f64))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #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))))))) (*.f64 x-scale (pow.f64 (PI.f64) #s(literal 2 binary64)))))))))))))))
#s(approx (* (cos (/ 1 (/ 180 (* (PI) angle)))) (sin (/ 1 (/ 180 (* (PI) 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 (* (cos (/ 1 (/ 180 (* (PI) angle)))) (sin (/ 1 (/ 180 (* (PI) 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 (* (cos (/ 1 (/ 180 (* (PI) angle)))) (sin (/ 1 (/ 180 (* (PI) 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 (/ (* y-scale (+ (sqrt (pow (sin (/ 1 (/ 180 (* (PI) angle)))) 4)) (pow (sin (/ 1 (/ 180 (* (PI) angle)))) 2))) (* x-scale (* (cos (/ 1 (/ 180 (* (PI) angle)))) (sin (/ 1 (/ 180 (* (PI) angle))))))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 angle (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale (PI.f64)))))
#s(approx (/ (* y-scale (+ (sqrt (pow (sin (/ 1 (/ 180 (* (PI) angle)))) 4)) (pow (sin (/ 1 (/ 180 (* (PI) angle)))) 2))) (* x-scale (* (cos (/ 1 (/ 180 (* (PI) angle)))) (sin (/ 1 (/ 180 (* (PI) angle))))))) (*.f64 angle (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 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/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal -1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (*.f64 x-scale (PI.f64)))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #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)))))) (*.f64 x-scale (pow.f64 (PI.f64) #s(literal 2 binary64))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (sin (/ 1 (/ 180 (* (PI) angle)))) 4)) (pow (sin (/ 1 (/ 180 (* (PI) angle)))) 2))) (* x-scale (* (cos (/ 1 (/ 180 (* (PI) angle)))) (sin (/ 1 (/ 180 (* (PI) angle))))))) (*.f64 angle (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 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/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal -1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (sqrt.f64 (*.f64 #s(literal 1/1049760000 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/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 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/9917964518400000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))) (*.f64 #s(literal 1/16200 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 #s(literal 1/10411482432835584000000000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 12 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (*.f64 #s(literal 1/1049760000 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/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal -1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (*.f64 x-scale (PI.f64)))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #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)))))) (*.f64 x-scale (pow.f64 (PI.f64) #s(literal 2 binary64))))))) (PI.f64))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #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))))))) (*.f64 x-scale (pow.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #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)))))) (*.f64 x-scale (pow.f64 (PI.f64) #s(literal 2 binary64))))))))))
#s(approx (/ (* y-scale (+ (sqrt (pow (sin (/ 1 (/ 180 (* (PI) angle)))) 4)) (pow (sin (/ 1 (/ 180 (* (PI) angle)))) 2))) (* x-scale (* (cos (/ 1 (/ 180 (* (PI) angle)))) (sin (/ 1 (/ 180 (* (PI) angle))))))) (*.f64 angle (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 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/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal -1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 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/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 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/9917964518400000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))) (*.f64 #s(literal 1/16200 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 #s(literal 1/10411482432835584000000000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 12 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (*.f64 #s(literal 1/1049760000 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/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/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/1574640000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 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 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #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 #s(literal -1/102036672000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 1/9917964518400000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))) (*.f64 #s(literal 1/16200 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 #s(literal 1/10411482432835584000000000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 12 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (*.f64 #s(literal 1/1049760000 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/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 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/9917964518400000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))) (*.f64 #s(literal 1/16200 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 #s(literal 1/10411482432835584000000000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 12 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (*.f64 #s(literal 1/1049760000 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/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal -1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (*.f64 x-scale (PI.f64)))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #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)))))) (*.f64 x-scale (pow.f64 (PI.f64) #s(literal 2 binary64))))))) (PI.f64))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #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))))))) (*.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/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal -1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (*.f64 x-scale (PI.f64)))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #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)))))) (*.f64 x-scale (pow.f64 (PI.f64) #s(literal 2 binary64))))))) (PI.f64))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #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)))))))) (*.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/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal -1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (*.f64 x-scale (PI.f64)))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #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)))))) (*.f64 x-scale (pow.f64 (PI.f64) #s(literal 2 binary64))))))) (PI.f64))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #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))))))) (*.f64 x-scale (pow.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #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)))))) (*.f64 x-scale (pow.f64 (PI.f64) #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 -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 (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (/ (- (* (* b b) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* 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))) (+.f64 (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))) (/.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 (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (/ (- (* (* b b) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* 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 (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))) (/.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 (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (/ (- (* (* b b) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* 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))) (+.f64 (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))) (/.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 (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 (* (PI) angle)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 4) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))
#s(approx (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))
#s(approx (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (+.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 (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (*.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 (* 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 (* (cos (/ 1 (/ 180 (* (PI) angle)))) (sin (/ 1 (/ 180 (* (PI) 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 (/ (* y-scale (+ (sqrt (pow (sin (/ 1 (/ 180 (* (PI) angle)))) 4)) (pow (sin (/ 1 (/ 180 (* (PI) angle)))) 2))) (* x-scale (* (cos (/ 1 (/ 180 (* (PI) angle)))) (sin (/ 1 (/ 180 (* (PI) angle))))))) (/.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 #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 x-scale x-scale)
#s(approx (* x-scale x-scale) (pow.f64 x-scale #s(literal 2 binary64)))
#s(approx (* (* x-scale x-scale) y-scale) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))
#s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a 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 (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 b) (* a 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 (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))) (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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) x-scale))
#s(approx (* x-scale (PI)) (*.f64 x-scale (PI.f64)))
#s(approx (/ (- (* (* b b) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-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 (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (+ (fabs (/ (- (* (* b b) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale))) (/.f64 (+.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale)))) (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) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-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 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))))) (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) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-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 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #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) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a 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 (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) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a 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 (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))) (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale)))))) (*.f64 angle (*.f64 (PI.f64) (-.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 (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (/ (- (* (* b b) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a 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 (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) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a 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 (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))) (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale)))))) (*.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 (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (/ (- (* (* b b) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a 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 (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))) (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale)))))) (*.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 (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* 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))) (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 (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 b) (* a 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 (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))) (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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))
#s(approx (- (* (* b b) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (pow.f64 x-scale #s(literal 2 binary64))) (/.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) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow 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) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* 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))) (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 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 (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (/ (- (* (* b b) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a 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 (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))) (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 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 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (/ (- (* (* b b) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* 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))) (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 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 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (/ (- (* (* b b) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a 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 (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))) (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 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 (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (/ (- (* (* b b) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* 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))) (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 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 (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (/ (- (* (* b b) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a 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 (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))) (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 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 (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* 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))) (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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.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 (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 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (/ (- (* (* b b) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* 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))) (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 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 (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) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* 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))) (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 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 (pow.f64 b #s(literal 2 binary64)) y-scale) (*.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 y-scale y-scale)
#s(approx (* y-scale y-scale) (pow.f64 y-scale #s(literal 2 binary64)))
#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 b) (* a 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 (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 b) (* a 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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 (pow.f64 a #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)))))))) y-scale))
#s(approx (* y-scale (+ (sqrt (* 1/1049760000 (pow (PI) 4))) (* 1/32400 (pow (PI) 2)))) (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 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 (- (* (* b b) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) y-scale))
#s(approx (/ (- (* (* b b) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale)) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 a #s(literal 2 binary64))) (/.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 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 (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (/ (- (* (* b b) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-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 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))) (/.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) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-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 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))) (/.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) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a a)))) (/.f64 (pow.f64 a #s(literal 2 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 (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (/ (- (* (* b b) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a a)))) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))) (/.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 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))))))) y-scale))
#s(approx (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (/ (- (* (* b b) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a a))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) x-scale) (*.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 (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (/ (- (* (* b b) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* 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 (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))) (/.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 (pow.f64 a #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))))))) y-scale))
#s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (/ (- (* (* b b) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* 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 (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))) (/.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 (pow.f64 a #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)))))))) y-scale))
#s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a 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 (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 b) (* a 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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))))
#s(approx (- (* (* b b) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (*.f64 y-scale (+.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)))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow 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) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-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 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.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) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a a)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))) (/.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 (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (/ (- (* (* b b) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a a)))) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))) (/.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 a #s(literal 2 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 (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (/ (- (* (* b b) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a a))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))) (/.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 (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (/ (- (* (* b b) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a a))))) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (+.f64 (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))) (/.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 (pow.f64 a #s(literal 2 binary64)) x-scale) (*.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 (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (/ (- (* (* b b) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a a)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))) (/.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 (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (/ (- (* (* b b) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a a)))))) (*.f64 y-scale (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (+.f64 (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))) (/.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 (pow.f64 a #s(literal 2 binary64)) x-scale) (*.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 (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a 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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))))
#s(approx (- (* (* b b) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 b #s(literal 2 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)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 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) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) 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 (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (/ (- (* (* b b) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a 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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (+.f64 (/.f64 (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (/.f64 (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 (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (/ (- (* (* b b) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a 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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (/.f64 (*.f64 x-scale (+.f64 (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))) (/.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 (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (/ (- (* (* b b) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a 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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (+.f64 (fabs.f64 (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) y-scale))) (/.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)))))))))))
Calls

15 calls:

TimeVariablePoint
11.0ms
x-scale
0
10.0ms
y-scale
0
9.0ms
angle
inf
8.0ms
angle
0
8.0ms
angle
-inf

rewrite170.0ms (1.6%)

Memory
1.3MiB live, 99.4MiB allocated; 10ms collecting garbage
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
01836921
02696717
112856481
040846481
Stop Event
iter-limit
node-limit
iter-limit
Counts
104 → 699
Calls
Call 1
Inputs
#s(literal 180 binary64)
a
angle
(PI.f64)
#s(literal 2 binary64)
b
y-scale
x-scale
#s(literal 1/180 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))))
(pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))
#s(literal 4 binary64)
#s(literal 1/2 binary64)
#s(literal 1 binary64)
(pow.f64 (PI.f64) #s(literal 2 binary64))
(pow.f64 (PI.f64) #s(literal 4 binary64))
#s(literal 1/32400 binary64)
#s(literal 90 binary64)
(*.f64 (PI.f64) angle)
(/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))
(*.f64 a a)
(*.f64 b b)
(*.f64 y-scale y-scale)
(*.f64 x-scale x-scale)
(*.f64 (*.f64 x-scale x-scale) y-scale)
(-.f64 (*.f64 b b) (*.f64 a a))
(cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle))))
(sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle))))
#s(literal -90 binary64)
(pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 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 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64)))
(/.f64 (*.f64 a a) y-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 b) (*.f64 a a)))
(*.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 b) (* a a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64))))))
(*.f64 x-scale (PI.f64))
(*.f64 angle (*.f64 x-scale (PI.f64)))
#s(literal 1/1049760000 binary64)
(*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))
(*.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 #s(literal 1/180 binary64) (*.f64 angle (*.f64 x-scale (PI.f64)))))
(sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))
(+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64))))
(*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64)))))
(*.f64 angle (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64))))))
(/.f64 (*.f64 angle (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale (PI.f64)))
(*.f64 #s(literal 90 binary64) (/.f64 (*.f64 angle (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale (PI.f64))))
#s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 angle (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale (PI.f64)))))
(*.f64 (*.f64 b b) y-scale)
(*.f64 (*.f64 x-scale x-scale) (/.f64 (*.f64 a a) y-scale))
(-.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 x-scale x-scale) (/.f64 (*.f64 a a) 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))
(pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) #s(literal 4 binary64))
(sqrt.f64 (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) #s(literal 4 binary64)))
(pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) #s(literal 2 binary64))
(+.f64 (sqrt.f64 (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) #s(literal 2 binary64)))
(*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) #s(literal 2 binary64))))
(*.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))))
(*.f64 x-scale (*.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle))))))
(/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))))))
(*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) 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 1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) 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)) #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 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.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)) #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 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.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)) #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 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.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)) #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 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle))))))))))) (PI.f64)))
(fabs.f64 (/.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 (fabs.f64 (/.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 b b) (*.f64 x-scale x-scale)))
(-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (/.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 b b) (*.f64 x-scale x-scale))))
(*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (/.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 b b) (*.f64 x-scale x-scale)))) y-scale)
(/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (/.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 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (-.f64 (*.f64 b b) (*.f64 a a))))
(*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (/.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 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (-.f64 (*.f64 b b) (*.f64 a 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 (*.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 b b) (*.f64 x-scale x-scale)))) y-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 #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 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 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (-.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 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (/.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 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (-.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 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (/.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 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (-.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 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (/.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 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (-.f64 (*.f64 b b) (*.f64 a a)))))))) (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 b) (* a 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 b) (* a 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 b) (* a 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 b) (* a a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))))) (PI.f64)))
(/.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)))) #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))))))
(*.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)))) #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 (* -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)))) #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 (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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)))) #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)))))))))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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)))) #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))))))))))
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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)))) #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)))))))))) (PI.f64))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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)))) #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)))))))))) (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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 angle (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-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 (* -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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 angle (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-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 (* -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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 angle (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-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 (* -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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 angle (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (*.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 (* -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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 angle (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale (PI.f64)))))))) (PI.f64)))
Outputs
#s(literal 180 binary64)
a
angle
(PI.f64)
#s(literal 2 binary64)
b
y-scale
x-scale
#s(literal 1/180 binary64)
(*.f64 (PI.f64) angle)
(*.f64 angle (PI.f64))
(log.f64 (pow.f64 (exp.f64 (PI.f64)) angle))
(*.f64 (pow.f64 (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))))
(*.f64 (pow.f64 #s(literal 180 binary64) #s(literal -1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (PI.f64) angle)) #s(literal -1 binary64)))
(*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))
(*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))
(*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))
(*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))
(*.f64 (PI.f64) (*.f64 angle #s(literal 1/180 binary64)))
(pow.f64 (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)) #s(literal -1 binary64))
(/.f64 (neg.f64 (*.f64 (PI.f64) angle)) #s(literal -180 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle))))
(/.f64 (*.f64 (PI.f64) angle) #s(literal 180 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle))) #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))))
(/.f64 #s(literal 1 binary64) (pow.f64 (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))
(/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle))) #s(literal -1 binary64)))
(log.f64 (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/180 binary64) angle)))
(log.f64 (pow.f64 (exp.f64 (PI.f64)) (*.f64 angle #s(literal 1/180 binary64))))
(sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(*.f64 (fabs.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (fabs.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(*.f64 (neg.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (neg.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 1 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 1 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))
(*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))
(pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (cos.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #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 (PI.f64) angle) #s(literal 1/180 binary64))))))
(exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))
#s(literal 4 binary64)
#s(literal 1/2 binary64)
#s(literal 1 binary64)
(*.f64 (fabs.f64 (PI.f64)) (fabs.f64 (PI.f64)))
(*.f64 (pow.f64 (PI.f64) #s(literal 1 binary64)) (pow.f64 (PI.f64) #s(literal 1 binary64)))
(*.f64 (pow.f64 (PI.f64) #s(literal 1 binary64)) (PI.f64))
(*.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) #s(literal 2 binary64)) (cbrt.f64 (*.f64 (PI.f64) (PI.f64))))
(*.f64 (pow.f64 (PI.f64) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (PI.f64) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (neg.f64 (PI.f64)) (neg.f64 (PI.f64)))
(*.f64 (PI.f64) (PI.f64))
(pow.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 2/3 binary64))
(pow.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1 binary64))
(pow.f64 (PI.f64) #s(literal 2 binary64))
(cbrt.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64))))
(exp.f64 (*.f64 (log.f64 (PI.f64)) #s(literal 2 binary64)))
(log.f64 (pow.f64 (exp.f64 (PI.f64)) (PI.f64)))
(*.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) #s(literal 4 binary64)) (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 4 binary64)))
(*.f64 (pow.f64 (PI.f64) (/.f64 #s(literal 4 binary64) #s(literal 2 binary64))) (pow.f64 (PI.f64) (/.f64 #s(literal 4 binary64) #s(literal 2 binary64))))
(pow.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 4/3 binary64))
(pow.f64 (PI.f64) #s(literal 4 binary64))
(exp.f64 (*.f64 (log.f64 (PI.f64)) #s(literal 4 binary64)))
#s(literal 1/32400 binary64)
#s(literal 90 binary64)
(*.f64 (PI.f64) angle)
(*.f64 angle (PI.f64))
(log.f64 (pow.f64 (exp.f64 (PI.f64)) angle))
(*.f64 #s(literal 180 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (PI.f64) angle)))
(/.f64 (neg.f64 (/.f64 #s(literal 180 binary64) (PI.f64))) (neg.f64 angle))
(/.f64 (/.f64 #s(literal 180 binary64) (PI.f64)) angle)
(/.f64 #s(literal -180 binary64) (neg.f64 (*.f64 (PI.f64) angle)))
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(/.f64 #s(literal 180 binary64) (neg.f64 (neg.f64 (*.f64 (PI.f64) angle))))
(/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle))
(*.f64 (pow.f64 (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))))
(*.f64 (pow.f64 #s(literal 180 binary64) #s(literal -1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (PI.f64) angle)) #s(literal -1 binary64)))
(*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))
(*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))
(*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))
(*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))
(*.f64 (PI.f64) (*.f64 angle #s(literal 1/180 binary64)))
(pow.f64 (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)) #s(literal -1 binary64))
(/.f64 (neg.f64 (*.f64 (PI.f64) angle)) #s(literal -180 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle))))
(/.f64 (*.f64 (PI.f64) angle) #s(literal 180 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle))) #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))))
(/.f64 #s(literal 1 binary64) (pow.f64 (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))
(/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle))) #s(literal -1 binary64)))
(log.f64 (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/180 binary64) angle)))
(log.f64 (pow.f64 (exp.f64 (PI.f64)) (*.f64 angle #s(literal 1/180 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 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 (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 (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 (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 (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 (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 (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 x-scale x-scale) y-scale)
(*.f64 x-scale (*.f64 x-scale y-scale))
(*.f64 y-scale (*.f64 x-scale x-scale))
(*.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 (neg.f64 (*.f64 a a)) (*.f64 b b))) (*.f64 b b))
(*.f64 (+.f64 b a) (-.f64 b a))
(*.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 (*.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 (*.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 b b) (*.f64 (neg.f64 a) a))
(+.f64 (*.f64 b b) (neg.f64 (*.f64 a a)))
(sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(cos.f64 (neg.f64 (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(cos.f64 (fabs.f64 (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(cos.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))
(cos.f64 (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))
(cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(+.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
#s(literal -90 binary64)
(*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (/.f64 #s(literal 4 binary64) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (/.f64 #s(literal 4 binary64) #s(literal 2 binary64))))
(pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))
(exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))
(*.f64 (pow.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(pow.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64)) #s(literal 1/2 binary64))
(sqrt.f64 (*.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64)))))
(sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64)))
(fabs.f64 (neg.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64)))))
(fabs.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))))
(exp.f64 (*.f64 (log.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) #s(literal 1/2 binary64)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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) angle) #s(literal 1/180 binary64)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 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 (PI.f64) angle) #s(literal 1/180 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (*.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #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 (PI.f64) angle) #s(literal 1/180 binary64)))))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64)))))
(/.f64 (-.f64 (*.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64)))) (*.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))))) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))))
(/.f64 (+.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #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 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (-.f64 (*.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #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 (PI.f64) angle) #s(literal 1/180 binary64)))))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64)))))))
(/.f64 (-.f64 (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #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 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal 3 binary64))) (+.f64 (*.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64)))) (+.f64 (*.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))))))
(/.f64 (-.f64 (*.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #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 (PI.f64) angle) #s(literal 1/180 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (-.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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) angle) #s(literal 1/180 binary64))))))))
(/.f64 (+.f64 (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #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 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 3 binary64))) (+.f64 (*.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #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 (PI.f64) angle) #s(literal 1/180 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (*.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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) angle) #s(literal 1/180 binary64))))))))))
(-.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))))
(+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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) angle) #s(literal 1/180 binary64)))))))
(+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 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 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (*.f64 y-scale (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64)))))) (*.f64 y-scale (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 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 (PI.f64) angle) #s(literal 1/180 binary64)))))) y-scale) (*.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) y-scale))) (*.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) y-scale))
(*.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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) angle) #s(literal 1/180 binary64))))))) y-scale)
(*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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) angle) #s(literal 1/180 binary64))))))))
(/.f64 (-.f64 (*.f64 (*.f64 y-scale (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64)))) (*.f64 y-scale (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))))) (*.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))))) (-.f64 (*.f64 y-scale (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64)))) (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) y-scale) (*.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 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 (PI.f64) angle) #s(literal 1/180 binary64)))))) y-scale) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) y-scale))) (-.f64 (*.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) y-scale) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) y-scale)))
(/.f64 (+.f64 (pow.f64 (*.f64 y-scale (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #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 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 y-scale (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64)))) (*.f64 y-scale (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))))) (-.f64 (*.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (*.f64 y-scale (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64)))) (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #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 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) y-scale) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) y-scale) (*.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 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 (PI.f64) angle) #s(literal 1/180 binary64)))))) y-scale) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) y-scale)) (*.f64 (*.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) y-scale) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) y-scale)))))
(+.f64 (*.f64 y-scale (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64)))) (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))))
(+.f64 (*.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) y-scale) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) y-scale))
(*.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)))
(*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/32400 binary64))
(*.f64 (*.f64 a a) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 a (/.f64 a y-scale))
(/.f64 (neg.f64 (neg.f64 (*.f64 a a))) (neg.f64 (neg.f64 y-scale)))
(/.f64 (neg.f64 (*.f64 a a)) (neg.f64 y-scale))
(/.f64 (*.f64 a a) y-scale)
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 y-scale) (neg.f64 (*.f64 a a))))
(/.f64 #s(literal 1 binary64) (/.f64 y-scale (*.f64 a a)))
(*.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 (neg.f64 (*.f64 a a)) (neg.f64 (*.f64 y-scale y-scale)))
(/.f64 (/.f64 (*.f64 a a) y-scale) y-scale)
(/.f64 (*.f64 a a) (*.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 y-scale (/.f64 (*.f64 a a) y-scale)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a)))
(*.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 (*.f64 b b) (*.f64 x-scale x-scale))
(/.f64 #s(literal 1 binary64) (/.f64 x-scale (/.f64 (*.f64 b b) 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 (+.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 y-scale (PI.f64))
(*.f64 (PI.f64) y-scale)
(log.f64 (pow.f64 (exp.f64 (PI.f64)) y-scale))
(*.f64 (*.f64 angle y-scale) (PI.f64))
(*.f64 (*.f64 y-scale (PI.f64)) angle)
(*.f64 angle (*.f64 y-scale (PI.f64)))
(log.f64 (pow.f64 (exp.f64 (PI.f64)) (*.f64 angle y-scale)))
(*.f64 x-scale (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 y-scale (PI.f64)) angle)))
(/.f64 (neg.f64 (/.f64 x-scale angle)) (neg.f64 (*.f64 y-scale (PI.f64))))
(/.f64 (neg.f64 (neg.f64 x-scale)) (neg.f64 (neg.f64 (*.f64 (*.f64 y-scale (PI.f64)) angle))))
(/.f64 (/.f64 x-scale angle) (*.f64 y-scale (PI.f64)))
(/.f64 (neg.f64 x-scale) (neg.f64 (*.f64 (*.f64 y-scale (PI.f64)) angle)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 y-scale (PI.f64)) (/.f64 x-scale angle)))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (*.f64 y-scale (PI.f64)) angle)) (neg.f64 x-scale)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 y-scale (PI.f64)) angle) x-scale))
(/.f64 x-scale (*.f64 (*.f64 y-scale (PI.f64)) angle))
(*.f64 (/.f64 #s(literal -90 binary64) (*.f64 angle y-scale)) (/.f64 x-scale (PI.f64)))
(*.f64 (/.f64 #s(literal -90 binary64) (*.f64 y-scale (PI.f64))) (/.f64 x-scale angle))
(*.f64 (/.f64 #s(literal -90 binary64) angle) (/.f64 x-scale (*.f64 y-scale (PI.f64))))
(*.f64 (/.f64 x-scale (*.f64 (*.f64 y-scale (PI.f64)) angle)) #s(literal -90 binary64))
(*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 (*.f64 y-scale (PI.f64)) angle)))
(/.f64 (neg.f64 (*.f64 #s(literal -90 binary64) x-scale)) (neg.f64 (*.f64 (*.f64 y-scale (PI.f64)) angle)))
(/.f64 (*.f64 #s(literal -90 binary64) x-scale) (*.f64 (*.f64 y-scale (PI.f64)) angle))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 y-scale (PI.f64)) angle) (*.f64 #s(literal -90 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 b) (* a a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 y-scale (PI.f64)) angle)) #s(literal -90 binary64)))
(*.f64 x-scale (PI.f64))
(*.f64 (PI.f64) x-scale)
(log.f64 (pow.f64 (exp.f64 (PI.f64)) x-scale))
(*.f64 (*.f64 angle x-scale) (PI.f64))
(*.f64 (*.f64 x-scale (PI.f64)) angle)
(*.f64 angle (*.f64 x-scale (PI.f64)))
(log.f64 (pow.f64 (exp.f64 (PI.f64)) (*.f64 angle x-scale)))
#s(literal 1/1049760000 binary64)
(*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))
(*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/1049760000 binary64))
(*.f64 (*.f64 #s(literal 1/180 binary64) angle) (*.f64 x-scale (PI.f64)))
(*.f64 (*.f64 (*.f64 x-scale (PI.f64)) angle) #s(literal 1/180 binary64))
(*.f64 #s(literal 1/180 binary64) (*.f64 (*.f64 x-scale (PI.f64)) angle))
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (*.f64 (*.f64 (*.f64 x-scale (PI.f64)) angle) #s(literal 1/180 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(*.f64 (pow.f64 #s(literal 1/1049760000 binary64) #s(literal 1/2 binary64)) (pow.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/1049760000 binary64) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (pow.f64 (PI.f64) #s(literal 4 binary64))) (sqrt.f64 #s(literal 1/1049760000 binary64)))
(*.f64 (sqrt.f64 #s(literal 1/1049760000 binary64)) (sqrt.f64 (pow.f64 (PI.f64) #s(literal 4 binary64))))
(pow.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) #s(literal 1/2 binary64))
(sqrt.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))
(sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))
(fabs.f64 (neg.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))
(fabs.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))
(exp.f64 (*.f64 (log.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) #s(literal 1/2 binary64)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64))) (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))) (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)))) (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))) (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64))) (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))) (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64))) (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))
(/.f64 (-.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64))))) (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64)))))
(/.f64 (-.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 (neg.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)))) (neg.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)))))) (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (neg.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64))))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)))) (-.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64))) (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))
(/.f64 (-.f64 (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64))) #s(literal 3 binary64))) (+.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (+.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64)))))))
(/.f64 (-.f64 (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)))) #s(literal 3 binary64))) (+.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (+.f64 (*.f64 (neg.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)))) (neg.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64))))) (*.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (neg.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64))))))))
(/.f64 (-.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64))))) (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)))))
(/.f64 (+.f64 (pow.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64))) #s(literal 3 binary64))) (+.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (-.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)))))))
(-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64))))
(-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (neg.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)))))
(+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64))))
(+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64))) (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 y-scale (*.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))) (*.f64 y-scale (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64))) y-scale) (*.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) y-scale))) (*.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) y-scale))
(*.f64 (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64)))) y-scale)
(*.f64 y-scale (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64)))))
(/.f64 (-.f64 (*.f64 (*.f64 y-scale (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 y-scale (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))) (*.f64 (*.f64 y-scale (*.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale (*.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)))))) (-.f64 (*.f64 y-scale (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 y-scale (*.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64))))))
(/.f64 (-.f64 (*.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) y-scale) (*.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) y-scale)) (*.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64))) y-scale) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64))) y-scale))) (-.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) y-scale) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64))) y-scale)))
(/.f64 (+.f64 (pow.f64 (*.f64 y-scale (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) #s(literal 3 binary64)) (pow.f64 (*.f64 y-scale (*.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 y-scale (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 y-scale (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))) (-.f64 (*.f64 (*.f64 y-scale (*.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale (*.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64))))) (*.f64 (*.f64 y-scale (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 y-scale (*.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) y-scale) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64))) y-scale) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) y-scale) (*.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) y-scale)) (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64))) y-scale) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64))) y-scale)) (*.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) y-scale) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64))) y-scale)))))
(+.f64 (*.f64 y-scale (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 y-scale (*.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)))))
(+.f64 (*.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) y-scale) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64))) y-scale))
(*.f64 (*.f64 angle y-scale) (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64)))))
(*.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64)))) y-scale) angle)
(*.f64 angle (*.f64 (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64)))) y-scale))
(*.f64 (/.f64 (*.f64 angle y-scale) x-scale) (/.f64 (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64)))) (PI.f64)))
(*.f64 (/.f64 (*.f64 angle y-scale) (PI.f64)) (/.f64 (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64)))) x-scale))
(*.f64 (/.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64)))) y-scale) x-scale) (/.f64 angle (PI.f64)))
(*.f64 (/.f64 angle (PI.f64)) (/.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64)))) y-scale) x-scale))
(*.f64 (/.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64)))) y-scale) (PI.f64)) (/.f64 angle x-scale))
(*.f64 (/.f64 angle x-scale) (/.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64)))) y-scale) (PI.f64)))
(*.f64 (*.f64 (*.f64 angle y-scale) (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64))))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (PI.f64))))
(*.f64 angle (/.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64)))) y-scale) (*.f64 x-scale (PI.f64))))
(/.f64 (neg.f64 (/.f64 (*.f64 (*.f64 angle y-scale) (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64))))) x-scale)) (neg.f64 (PI.f64)))
(/.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 angle y-scale) (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64))))))) (neg.f64 (neg.f64 (*.f64 x-scale (PI.f64)))))
(/.f64 (/.f64 (*.f64 (*.f64 angle y-scale) (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64))))) x-scale) (PI.f64))
(/.f64 (neg.f64 (*.f64 (*.f64 angle y-scale) (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64)))))) (neg.f64 (*.f64 x-scale (PI.f64))))
(/.f64 (*.f64 (*.f64 angle y-scale) (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64))))) (*.f64 x-scale (PI.f64)))
(/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) (/.f64 (*.f64 (*.f64 angle y-scale) (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64))))) x-scale)))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 x-scale (PI.f64))) (neg.f64 (*.f64 (*.f64 angle y-scale) (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale (PI.f64)) (*.f64 (*.f64 angle y-scale) (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64)))))))
(*.f64 (/.f64 #s(literal 90 binary64) x-scale) (/.f64 (*.f64 (*.f64 angle y-scale) (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64))))) (PI.f64)))
(*.f64 (/.f64 #s(literal 90 binary64) (PI.f64)) (/.f64 (*.f64 (*.f64 angle y-scale) (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64))))) x-scale))
(*.f64 (/.f64 (*.f64 (*.f64 angle y-scale) (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64))))) (*.f64 x-scale (PI.f64))) #s(literal 90 binary64))
(*.f64 #s(literal 90 binary64) (/.f64 (*.f64 (*.f64 angle y-scale) (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64))))) (*.f64 x-scale (PI.f64))))
(/.f64 (neg.f64 (*.f64 #s(literal 90 binary64) (*.f64 (*.f64 angle y-scale) (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64))))))) (neg.f64 (*.f64 x-scale (PI.f64))))
(/.f64 (*.f64 #s(literal 90 binary64) (*.f64 (*.f64 angle y-scale) (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 x-scale (PI.f64)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale (PI.f64)) (*.f64 #s(literal 90 binary64) (*.f64 (*.f64 angle y-scale) (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64))))))))
#s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 (/.f64 (*.f64 (*.f64 angle y-scale) (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64))))) (*.f64 x-scale (PI.f64))) #s(literal 90 binary64)))
(*.f64 (*.f64 b b) y-scale)
(*.f64 y-scale (*.f64 b b))
(*.f64 b (*.f64 b y-scale))
(*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale x-scale))
(*.f64 (*.f64 x-scale x-scale) (/.f64 (*.f64 a a) y-scale))
(*.f64 x-scale (*.f64 x-scale (/.f64 (*.f64 a a) y-scale)))
(/.f64 (neg.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 a a))) (neg.f64 y-scale))
(/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 a a)) y-scale)
(/.f64 #s(literal 1 binary64) (/.f64 y-scale (*.f64 (*.f64 x-scale x-scale) (*.f64 a a))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) y-scale)) (*.f64 (*.f64 b b) y-scale))) (*.f64 (*.f64 b b) y-scale))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) y-scale))) (*.f64 (*.f64 b b) y-scale))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) y-scale))) (*.f64 (*.f64 b b) y-scale))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 a a))) y-scale)
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 b b) y-scale)) (*.f64 (*.f64 (neg.f64 (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) y-scale)) (*.f64 (neg.f64 (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) y-scale)))) (-.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (neg.f64 (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) y-scale))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 b b) y-scale)) (*.f64 (neg.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale x-scale))) (neg.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale x-scale))))) (-.f64 (*.f64 (*.f64 b b) y-scale) (neg.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale x-scale)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 b b) y-scale) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) y-scale)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 b b) y-scale)) (-.f64 (*.f64 (*.f64 (neg.f64 (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) y-scale)) (*.f64 (neg.f64 (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) y-scale))) (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (neg.f64 (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) y-scale))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 b b) y-scale) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale x-scale))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 b b) y-scale)) (-.f64 (*.f64 (neg.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale x-scale))) (neg.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (*.f64 b b) y-scale) (neg.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale x-scale)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 b b) y-scale)) (*.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale x-scale)) (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale x-scale)))) (+.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale x-scale))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 b b) y-scale) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale x-scale)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 b b) y-scale)) (+.f64 (*.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale x-scale)) (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale x-scale))) (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale x-scale))))))
(neg.f64 (-.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) y-scale)))
(-.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale x-scale)))
(+.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (neg.f64 (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) y-scale)))
(+.f64 (*.f64 (*.f64 b b) y-scale) (neg.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale x-scale))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (neg.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 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale x-scale)) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 x-scale x-scale) y-scale)))) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 x-scale x-scale) y-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 (*.f64 (*.f64 b b) y-scale) (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale x-scale))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale x-scale) y-scale)))
(/.f64 (-.f64 (*.f64 (*.f64 b (/.f64 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 b (/.f64 b (*.f64 x-scale x-scale))) y-scale) (/.f64 (*.f64 a a) y-scale)) y-scale)
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 x-scale x-scale) y-scale)) (*.f64 (*.f64 x-scale x-scale) y-scale)) (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale x-scale))) (*.f64 (*.f64 x-scale x-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 (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 (*.f64 b b) y-scale) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 x-scale x-scale) y-scale))) (*.f64 (/.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale x-scale)) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale x-scale)) (*.f64 (*.f64 x-scale x-scale) y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale x-scale)) (*.f64 (*.f64 x-scale x-scale) y-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 (pow.f64 (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 x-scale x-scale) y-scale)) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale x-scale)) (*.f64 (*.f64 x-scale x-scale) y-scale)) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 x-scale x-scale) y-scale))) (+.f64 (*.f64 (/.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale x-scale)) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale x-scale)) (*.f64 (*.f64 x-scale x-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale x-scale)) (*.f64 (*.f64 x-scale 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) 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) (*.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)) (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)) 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)) (*.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 (-.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 x-scale x-scale) y-scale)) (*.f64 (*.f64 (*.f64 x-scale x-scale) y-scale) (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (*.f64 x-scale x-scale) y-scale) (*.f64 (*.f64 x-scale x-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 (neg.f64 (/.f64 (-.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale x-scale))) (*.f64 x-scale x-scale))) (neg.f64 y-scale))
(/.f64 (neg.f64 (neg.f64 (-.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale x-scale))))) (neg.f64 (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale))))
(/.f64 (/.f64 (-.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale x-scale))) (*.f64 x-scale x-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 b (/.f64 b (*.f64 x-scale x-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 a a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale x-scale)))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)))
(/.f64 (-.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale x-scale))) (*.f64 (*.f64 x-scale x-scale) y-scale))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 y-scale y-scale) (-.f64 (*.f64 (*.f64 b (/.f64 b (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale)) (*.f64 a a))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (-.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 y-scale (/.f64 (-.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale x-scale))) (*.f64 x-scale x-scale))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale)) (neg.f64 (-.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale x-scale))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) y-scale) (-.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale x-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 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale x-scale)) (*.f64 (*.f64 x-scale x-scale) y-scale)))
(-.f64 (*.f64 b (/.f64 b (*.f64 x-scale x-scale))) (*.f64 a (/.f64 a (*.f64 y-scale y-scale))))
(+.f64 (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.f64 (*.f64 (neg.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) y-scale) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale x-scale))) (*.f64 (*.f64 x-scale x-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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (/.f64 #s(literal 4 binary64) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (/.f64 #s(literal 4 binary64) #s(literal 2 binary64))))
(pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))
(exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) #s(literal 4 binary64)))
(*.f64 (pow.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(pow.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64)) #s(literal 1/2 binary64))
(sqrt.f64 (*.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64)))))
(sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64)))
(fabs.f64 (neg.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64)))))
(fabs.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))))
(exp.f64 (*.f64 (log.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) #s(literal 1/2 binary64)))
(*.f64 (fabs.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (fabs.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(*.f64 (neg.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (neg.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 1 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 1 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))
(*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))
(pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (cos.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #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 (PI.f64) angle) #s(literal 1/180 binary64))))))
(exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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) angle) #s(literal 1/180 binary64)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 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 (PI.f64) angle) #s(literal 1/180 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (*.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #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 (PI.f64) angle) #s(literal 1/180 binary64)))))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64)))))
(/.f64 (-.f64 (*.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64)))) (*.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))))) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))))
(/.f64 (+.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #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 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (-.f64 (*.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #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 (PI.f64) angle) #s(literal 1/180 binary64)))))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64)))))))
(/.f64 (-.f64 (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #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 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal 3 binary64))) (+.f64 (*.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64)))) (+.f64 (*.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))))))
(/.f64 (-.f64 (*.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #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 (PI.f64) angle) #s(literal 1/180 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (-.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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) angle) #s(literal 1/180 binary64))))))))
(/.f64 (+.f64 (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #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 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 3 binary64))) (+.f64 (*.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #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 (PI.f64) angle) #s(literal 1/180 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (*.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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) angle) #s(literal 1/180 binary64))))))))))
(-.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))))
(+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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) angle) #s(literal 1/180 binary64)))))))
(+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 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 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (*.f64 y-scale (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64)))))) (*.f64 y-scale (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 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 (PI.f64) angle) #s(literal 1/180 binary64)))))) y-scale) (*.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) y-scale))) (*.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) y-scale))
(*.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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) angle) #s(literal 1/180 binary64))))))) y-scale)
(*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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) angle) #s(literal 1/180 binary64))))))))
(/.f64 (-.f64 (*.f64 (*.f64 y-scale (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64)))) (*.f64 y-scale (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))))) (*.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))))) (-.f64 (*.f64 y-scale (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64)))) (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) y-scale) (*.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 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 (PI.f64) angle) #s(literal 1/180 binary64)))))) y-scale) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) y-scale))) (-.f64 (*.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) y-scale) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) y-scale)))
(/.f64 (+.f64 (pow.f64 (*.f64 y-scale (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #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 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 y-scale (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64)))) (*.f64 y-scale (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))))) (-.f64 (*.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (*.f64 y-scale (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64)))) (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #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 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) y-scale) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) y-scale) (*.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 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 (PI.f64) angle) #s(literal 1/180 binary64)))))) y-scale) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) y-scale)) (*.f64 (*.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) y-scale) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) y-scale)))))
(+.f64 (*.f64 y-scale (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64)))) (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))))
(+.f64 (*.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) y-scale) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) y-scale))
(*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))
(*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (cos.f64 (+.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (sin.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (sin.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (fabs.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 2 binary64))
(*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))
(*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) x-scale)
(*.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(*.f64 (/.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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) angle) #s(literal 1/180 binary64))))))) (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (/.f64 y-scale (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(*.f64 (/.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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) angle) #s(literal 1/180 binary64))))))) x-scale) (/.f64 y-scale (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(*.f64 (/.f64 y-scale (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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) angle) #s(literal 1/180 binary64))))))) x-scale))
(*.f64 (/.f64 y-scale (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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) angle) #s(literal 1/180 binary64))))))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(*.f64 (/.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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) angle) #s(literal 1/180 binary64))))))) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (/.f64 y-scale x-scale))
(*.f64 (/.f64 y-scale x-scale) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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) angle) #s(literal 1/180 binary64))))))) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(*.f64 (*.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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) angle) #s(literal 1/180 binary64))))))) y-scale) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(*.f64 y-scale (/.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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) angle) #s(literal 1/180 binary64))))))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(/.f64 (neg.f64 (/.f64 (*.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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) angle) #s(literal 1/180 binary64))))))) y-scale) x-scale)) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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) angle) #s(literal 1/180 binary64))))))) y-scale))) (neg.f64 (neg.f64 (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))
(/.f64 (/.f64 (*.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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) angle) #s(literal 1/180 binary64))))))) y-scale) x-scale) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(/.f64 (neg.f64 (*.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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) angle) #s(literal 1/180 binary64))))))) y-scale)) (neg.f64 (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(/.f64 (*.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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) angle) #s(literal 1/180 binary64))))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (/.f64 (*.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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) angle) #s(literal 1/180 binary64))))))) y-scale) x-scale)))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (neg.f64 (*.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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) angle) #s(literal 1/180 binary64))))))) y-scale))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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) angle) #s(literal 1/180 binary64))))))) y-scale)))
(+.f64 (/.f64 (*.f64 y-scale (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(+.f64 (/.f64 (*.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(*.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (/.f64 (*.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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) angle) #s(literal 1/180 binary64))))))) y-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(*.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (/.f64 (*.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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) angle) #s(literal 1/180 binary64))))))) y-scale) x-scale))
(*.f64 (/.f64 #s(literal 1/2 binary64) x-scale) (/.f64 (*.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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) angle) #s(literal 1/180 binary64))))))) y-scale) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(*.f64 (/.f64 (*.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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) angle) #s(literal 1/180 binary64))))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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) angle) #s(literal 1/180 binary64))))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(/.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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) angle) #s(literal 1/180 binary64))))))) y-scale))) (neg.f64 (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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) angle) #s(literal 1/180 binary64))))))) y-scale)) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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) angle) #s(literal 1/180 binary64))))))) 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 (/.f64 (*.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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) angle) #s(literal 1/180 binary64))))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/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)) #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 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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) angle) #s(literal 1/180 binary64))))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #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)) #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 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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) angle) #s(literal 1/180 binary64))))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #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)) #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 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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) angle) #s(literal 1/180 binary64))))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #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)) #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 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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) angle) #s(literal 1/180 binary64))))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #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)) #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 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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) angle) #s(literal 1/180 binary64))))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 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)) #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 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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) angle) #s(literal 1/180 binary64))))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))))) (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)) #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 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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) angle) #s(literal 1/180 binary64))))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #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)) #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 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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) angle) #s(literal 1/180 binary64))))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))))))
(*.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 (* -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 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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) angle) #s(literal 1/180 binary64))))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #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)) #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 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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) angle) #s(literal 1/180 binary64))))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #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)) #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 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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) angle) #s(literal 1/180 binary64))))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #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)) #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 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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) angle) #s(literal 1/180 binary64))))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #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)) #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 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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) angle) #s(literal 1/180 binary64))))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #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)) #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 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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) angle) #s(literal 1/180 binary64))))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))))))))
(*.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 (fabs.f64 (-.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) y-scale))) (fabs.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale x-scale) y-scale))))
(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 (neg.f64 (fabs.f64 (-.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) y-scale)))) (neg.f64 (*.f64 (fabs.f64 y-scale) (*.f64 x-scale x-scale))))
(/.f64 (fabs.f64 (/.f64 (-.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale x-scale))) (*.f64 x-scale x-scale))) (fabs.f64 y-scale))
(/.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))))
(/.f64 (fabs.f64 (-.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) y-scale))) (*.f64 (fabs.f64 y-scale) (*.f64 x-scale x-scale)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (fabs.f64 y-scale) (*.f64 x-scale x-scale)) (fabs.f64 (-.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) 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 (-.f64 (/.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale x-scale)) (*.f64 (*.f64 x-scale x-scale) y-scale)) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 x-scale x-scale) y-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 (-.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)))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.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 b (/.f64 b (*.f64 x-scale x-scale))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.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 #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 (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) x-scale) (/.f64 (*.f64 b b) 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))))) (neg.f64 (*.f64 x-scale x-scale))) (neg.f64 (*.f64 b b))) (neg.f64 (*.f64 x-scale x-scale)))
(/.f64 (+.f64 (*.f64 (*.f64 b (/.f64 b (*.f64 x-scale x-scale))) (*.f64 (fabs.f64 y-scale) (*.f64 x-scale x-scale))) (fabs.f64 (-.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) y-scale)))) (*.f64 (fabs.f64 y-scale) (*.f64 x-scale x-scale)))
(/.f64 (+.f64 (*.f64 (fabs.f64 (-.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) y-scale))) x-scale) (*.f64 (/.f64 (*.f64 b b) x-scale) (*.f64 (fabs.f64 y-scale) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (fabs.f64 y-scale) (*.f64 x-scale x-scale)) x-scale))
(/.f64 (+.f64 (*.f64 (fabs.f64 (-.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) y-scale))) (neg.f64 (*.f64 x-scale x-scale))) (*.f64 (neg.f64 (*.f64 b b)) (*.f64 (fabs.f64 y-scale) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (fabs.f64 y-scale) (*.f64 x-scale x-scale)) (neg.f64 (*.f64 x-scale x-scale))))
(/.f64 (+.f64 (*.f64 (fabs.f64 (-.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) y-scale))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (*.f64 (fabs.f64 y-scale) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (fabs.f64 y-scale) (*.f64 x-scale x-scale)) (*.f64 x-scale x-scale)))
(/.f64 (+.f64 (*.f64 (/.f64 (*.f64 b b) x-scale) (*.f64 (fabs.f64 y-scale) (*.f64 x-scale x-scale))) (*.f64 (fabs.f64 (-.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) y-scale))) x-scale)) (*.f64 x-scale (*.f64 (fabs.f64 y-scale) (*.f64 x-scale x-scale))))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 b b)) (*.f64 (fabs.f64 y-scale) (*.f64 x-scale x-scale))) (*.f64 (fabs.f64 (-.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) y-scale))) (neg.f64 (*.f64 x-scale x-scale)))) (*.f64 (neg.f64 (*.f64 x-scale x-scale)) (*.f64 (fabs.f64 y-scale) (*.f64 x-scale x-scale))))
(/.f64 (+.f64 (*.f64 (*.f64 b b) (*.f64 (fabs.f64 y-scale) (*.f64 x-scale x-scale))) (*.f64 (fabs.f64 (-.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) y-scale))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (fabs.f64 y-scale) (*.f64 x-scale x-scale))))
(/.f64 (-.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 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 (*.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 (+.f64 (*.f64 (fabs.f64 (-.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) y-scale))) x-scale) (*.f64 (*.f64 (fabs.f64 y-scale) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) x-scale))) (*.f64 (*.f64 (fabs.f64 y-scale) (*.f64 x-scale x-scale)) x-scale))
(/.f64 (+.f64 (*.f64 (fabs.f64 (-.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) y-scale))) (neg.f64 (*.f64 x-scale x-scale))) (*.f64 (*.f64 (fabs.f64 y-scale) (*.f64 x-scale x-scale)) (neg.f64 (*.f64 b b)))) (*.f64 (*.f64 (fabs.f64 y-scale) (*.f64 x-scale x-scale)) (neg.f64 (*.f64 x-scale x-scale))))
(/.f64 (+.f64 (*.f64 (fabs.f64 (-.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) y-scale))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (fabs.f64 y-scale) (*.f64 x-scale x-scale)) (*.f64 b b))) (*.f64 (*.f64 (fabs.f64 y-scale) (*.f64 x-scale x-scale)) (*.f64 x-scale x-scale)))
(/.f64 (+.f64 (*.f64 (/.f64 (*.f64 b b) x-scale) (*.f64 (fabs.f64 y-scale) (*.f64 x-scale x-scale))) (*.f64 x-scale (fabs.f64 (-.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) y-scale))))) (*.f64 x-scale (*.f64 (fabs.f64 y-scale) (*.f64 x-scale x-scale))))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 b b)) (*.f64 (fabs.f64 y-scale) (*.f64 x-scale x-scale))) (*.f64 (neg.f64 (*.f64 x-scale x-scale)) (fabs.f64 (-.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) y-scale))))) (*.f64 (neg.f64 (*.f64 x-scale x-scale)) (*.f64 (fabs.f64 y-scale) (*.f64 x-scale x-scale))))
(/.f64 (+.f64 (*.f64 (*.f64 b b) (*.f64 (fabs.f64 y-scale) (*.f64 x-scale x-scale))) (*.f64 (*.f64 x-scale x-scale) (fabs.f64 (-.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) y-scale))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (fabs.f64 y-scale) (*.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 #s(literal 1 binary64) (/.f64 (*.f64 x-scale x-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 (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 (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 a (/.f64 a (*.f64 y-scale y-scale))))) (*.f64 a (/.f64 a (*.f64 y-scale y-scale))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.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 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 #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)))))) x-scale) (/.f64 (*.f64 b b) x-scale)) x-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)))))) (neg.f64 (*.f64 x-scale x-scale))) (neg.f64 (*.f64 b b))) (neg.f64 (*.f64 x-scale x-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 x-scale x-scale)) (*.f64 b b)) (*.f64 x-scale x-scale))
(/.f64 (-.f64 (*.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 x-scale x-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 x-scale x-scale))
(/.f64 (-.f64 (*.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 a (/.f64 a (*.f64 y-scale y-scale)))) (*.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 (*.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 (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 (*.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 (*.f64 x-scale x-scale) y-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 y-scale y-scale) (*.f64 x-scale x-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 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))))) y-scale)
(*.f64 y-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 (-.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))))) (PI.f64)) (/.f64 y-scale (*.f64 angle (*.f64 (+.f64 b a) (-.f64 b a)))))
(*.f64 (/.f64 (-.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 b a) (-.f64 b a))) (/.f64 y-scale (*.f64 (PI.f64) angle)))
(*.f64 (/.f64 y-scale (*.f64 (PI.f64) angle)) (/.f64 (-.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 b a) (-.f64 b a))))
(*.f64 (/.f64 y-scale (PI.f64)) (/.f64 (-.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 angle (*.f64 (+.f64 b a) (-.f64 b a)))))
(*.f64 (/.f64 y-scale (*.f64 (+.f64 b a) (-.f64 b a))) (/.f64 (-.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 (PI.f64) angle)))
(*.f64 (/.f64 (-.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 (PI.f64) angle)) (/.f64 y-scale (*.f64 (+.f64 b a) (-.f64 b a))))
(*.f64 (*.f64 (-.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))))) y-scale) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) angle))))
(*.f64 (-.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 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) angle))))
(/.f64 (neg.f64 (/.f64 (*.f64 (-.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))))) y-scale) (*.f64 (PI.f64) angle))) (neg.f64 (*.f64 (+.f64 b a) (-.f64 b a))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (-.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))))) y-scale))) (neg.f64 (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) angle)))))
(/.f64 (/.f64 (*.f64 (-.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))))) y-scale) (*.f64 (PI.f64) angle)) (*.f64 (+.f64 b a) (-.f64 b a)))
(/.f64 (neg.f64 (*.f64 (-.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))))) y-scale)) (neg.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))) (+.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))))) y-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) angle)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (*.f64 (-.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))))) y-scale) (*.f64 (PI.f64) angle))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) angle))) (neg.f64 (*.f64 (-.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))))) y-scale))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) angle)) (*.f64 (-.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))))) y-scale)))
(*.f64 (/.f64 x-scale (*.f64 (+.f64 b a) (-.f64 b a))) (/.f64 (*.f64 (-.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))))) y-scale) (*.f64 (PI.f64) angle)))
(*.f64 (/.f64 x-scale (*.f64 (PI.f64) angle)) (/.f64 (*.f64 (-.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))))) y-scale) (*.f64 (+.f64 b a) (-.f64 b a))))
(*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 (-.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))))) y-scale) (*.f64 angle (*.f64 (+.f64 b a) (-.f64 b a)))))
(*.f64 (*.f64 (-.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 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) angle)))) x-scale)
(*.f64 x-scale (*.f64 (-.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 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) angle)))))
(/.f64 (neg.f64 (*.f64 x-scale (*.f64 (-.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))))) y-scale))) (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) angle))))
(/.f64 (*.f64 x-scale (*.f64 (-.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))))) y-scale)) (*.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 x-scale (*.f64 (-.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))))) y-scale))))
(*.f64 (*.f64 #s(literal 90 binary64) x-scale) (*.f64 (-.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 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) angle)))))
(*.f64 (*.f64 (*.f64 (-.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 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 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 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 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 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 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 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 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 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 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 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 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 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) angle)))))))) (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 #s(literal 90 binary64) x-scale) (*.f64 (-.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 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) angle))))))) (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 #s(literal 90 binary64) x-scale) (*.f64 (-.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 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) angle))))))))))
(/.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 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 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) angle)))))))))
(*.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 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 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 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 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 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 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 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 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 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 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) angle)))))))) (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 #s(literal 90 binary64) x-scale) (*.f64 (-.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 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) 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)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 y-scale (PI.f64)) 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 b) (* a a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 y-scale (PI.f64)) 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 b) (* a a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 y-scale (PI.f64)) 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 b) (* a a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 y-scale (PI.f64)) 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 b) (* a a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 y-scale (PI.f64)) angle)) #s(literal -90 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)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 y-scale (PI.f64)) angle)) #s(literal -90 binary64))))) (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)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 y-scale (PI.f64)) angle)) #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)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 y-scale (PI.f64)) angle)) #s(literal -90 binary64)))))))
(*.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 b) (* a a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 y-scale (PI.f64)) 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 b) (* a a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 y-scale (PI.f64)) 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 b) (* a a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 y-scale (PI.f64)) 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 b) (* a a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 y-scale (PI.f64)) 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 b) (* a a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 y-scale (PI.f64)) angle)) #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)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 y-scale (PI.f64)) angle)) #s(literal -90 binary64))))))))
(*.f64 (*.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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) angle) #s(literal 1/180 binary64))))))) y-scale) (/.f64 #s(literal 1 binary64) #s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (*.f64 (*.f64 (*.f64 x-scale (PI.f64)) angle) #s(literal 1/180 binary64)))))
(*.f64 y-scale (/.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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) angle) #s(literal 1/180 binary64))))))) #s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (*.f64 (*.f64 (*.f64 x-scale (PI.f64)) angle) #s(literal 1/180 binary64)))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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) angle) #s(literal 1/180 binary64))))))) y-scale))) (neg.f64 (neg.f64 #s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (*.f64 (*.f64 (*.f64 x-scale (PI.f64)) angle) #s(literal 1/180 binary64))))))
(/.f64 (neg.f64 (*.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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) angle) #s(literal 1/180 binary64))))))) y-scale)) (neg.f64 #s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (*.f64 (*.f64 (*.f64 x-scale (PI.f64)) angle) #s(literal 1/180 binary64)))))
(/.f64 (*.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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) angle) #s(literal 1/180 binary64))))))) y-scale) #s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (*.f64 (*.f64 (*.f64 x-scale (PI.f64)) angle) #s(literal 1/180 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 #s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (*.f64 (*.f64 (*.f64 x-scale (PI.f64)) angle) #s(literal 1/180 binary64)))) (neg.f64 (*.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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) angle) #s(literal 1/180 binary64))))))) y-scale))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (*.f64 (*.f64 (*.f64 x-scale (PI.f64)) angle) #s(literal 1/180 binary64))) (*.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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) angle) #s(literal 1/180 binary64))))))) y-scale)))
(+.f64 (/.f64 (*.f64 y-scale (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64)))) #s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (*.f64 (*.f64 (*.f64 x-scale (PI.f64)) angle) #s(literal 1/180 binary64)))) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (*.f64 (*.f64 (*.f64 x-scale (PI.f64)) angle) #s(literal 1/180 binary64)))))
(+.f64 (/.f64 (*.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) y-scale) #s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (*.f64 (*.f64 (*.f64 x-scale (PI.f64)) angle) #s(literal 1/180 binary64)))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) y-scale) #s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (*.f64 (*.f64 (*.f64 x-scale (PI.f64)) angle) #s(literal 1/180 binary64)))))
(*.f64 (*.f64 y-scale (/.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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) angle) #s(literal 1/180 binary64))))))) #s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (*.f64 (*.f64 (*.f64 x-scale (PI.f64)) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (*.f64 y-scale (/.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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) angle) #s(literal 1/180 binary64))))))) #s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (*.f64 (*.f64 (*.f64 x-scale (PI.f64)) angle) #s(literal 1/180 binary64))))))
(/.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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) angle) #s(literal 1/180 binary64))))))) y-scale))) (neg.f64 #s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (*.f64 (*.f64 (*.f64 x-scale (PI.f64)) angle) #s(literal 1/180 binary64)))))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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) angle) #s(literal 1/180 binary64))))))) y-scale)) #s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (*.f64 (*.f64 (*.f64 x-scale (PI.f64)) angle) #s(literal 1/180 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (*.f64 (*.f64 (*.f64 x-scale (PI.f64)) angle) #s(literal 1/180 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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) angle) #s(literal 1/180 binary64))))))) 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 (*.f64 y-scale (/.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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) angle) #s(literal 1/180 binary64))))))) #s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (*.f64 (*.f64 (*.f64 x-scale (PI.f64)) angle) #s(literal 1/180 binary64))))) #s(literal 1/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)) #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 y-scale (/.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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) angle) #s(literal 1/180 binary64))))))) #s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (*.f64 (*.f64 (*.f64 x-scale (PI.f64)) angle) #s(literal 1/180 binary64))))) #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)) #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 y-scale (/.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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) angle) #s(literal 1/180 binary64))))))) #s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (*.f64 (*.f64 (*.f64 x-scale (PI.f64)) angle) #s(literal 1/180 binary64))))) #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)) #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 y-scale (/.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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) angle) #s(literal 1/180 binary64))))))) #s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (*.f64 (*.f64 (*.f64 x-scale (PI.f64)) angle) #s(literal 1/180 binary64))))) #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)) #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 y-scale (/.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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) angle) #s(literal 1/180 binary64))))))) #s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (*.f64 (*.f64 (*.f64 x-scale (PI.f64)) angle) #s(literal 1/180 binary64))))) #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)) #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 y-scale (/.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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) angle) #s(literal 1/180 binary64))))))) #s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (*.f64 (*.f64 (*.f64 x-scale (PI.f64)) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 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)) #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 y-scale (/.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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) angle) #s(literal 1/180 binary64))))))) #s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (*.f64 (*.f64 (*.f64 x-scale (PI.f64)) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))))) (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)) #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 y-scale (/.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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) angle) #s(literal 1/180 binary64))))))) #s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (*.f64 (*.f64 (*.f64 x-scale (PI.f64)) angle) #s(literal 1/180 binary64))))) #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)) #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 y-scale (/.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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) angle) #s(literal 1/180 binary64))))))) #s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (*.f64 (*.f64 (*.f64 x-scale (PI.f64)) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))))))
(*.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 (* -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 y-scale (/.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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) angle) #s(literal 1/180 binary64))))))) #s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (*.f64 (*.f64 (*.f64 x-scale (PI.f64)) angle) #s(literal 1/180 binary64))))) #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)) #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 y-scale (/.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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) angle) #s(literal 1/180 binary64))))))) #s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (*.f64 (*.f64 (*.f64 x-scale (PI.f64)) angle) #s(literal 1/180 binary64))))) #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)) #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 y-scale (/.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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) angle) #s(literal 1/180 binary64))))))) #s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (*.f64 (*.f64 (*.f64 x-scale (PI.f64)) angle) #s(literal 1/180 binary64))))) #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)) #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 y-scale (/.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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) angle) #s(literal 1/180 binary64))))))) #s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (*.f64 (*.f64 (*.f64 x-scale (PI.f64)) angle) #s(literal 1/180 binary64))))) #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)) #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 y-scale (/.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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) angle) #s(literal 1/180 binary64))))))) #s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (*.f64 (*.f64 (*.f64 x-scale (PI.f64)) angle) #s(literal 1/180 binary64))))) #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)) #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 y-scale (/.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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) angle) #s(literal 1/180 binary64))))))) #s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (*.f64 (*.f64 (*.f64 x-scale (PI.f64)) angle) #s(literal 1/180 binary64))))) #s(literal 1/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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 (/.f64 (*.f64 (*.f64 angle y-scale) (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64))))) (*.f64 x-scale (PI.f64))) #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 (* -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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 (/.f64 (*.f64 (*.f64 angle y-scale) (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64))))) (*.f64 x-scale (PI.f64))) #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 (* -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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 (/.f64 (*.f64 (*.f64 angle y-scale) (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64))))) (*.f64 x-scale (PI.f64))) #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 (* -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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 (/.f64 (*.f64 (*.f64 angle y-scale) (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64))))) (*.f64 x-scale (PI.f64))) #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 (* -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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 (/.f64 (*.f64 (*.f64 angle y-scale) (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64))))) (*.f64 x-scale (PI.f64))) #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 (* -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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 (/.f64 (*.f64 (*.f64 angle y-scale) (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64))))) (*.f64 x-scale (PI.f64))) #s(literal 90 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)) #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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 (/.f64 (*.f64 (*.f64 angle y-scale) (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64))))) (*.f64 x-scale (PI.f64))) #s(literal 90 binary64)))))) (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)) #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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 (/.f64 (*.f64 (*.f64 angle y-scale) (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64))))) (*.f64 x-scale (PI.f64))) #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)) #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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 (/.f64 (*.f64 (*.f64 angle y-scale) (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64))))) (*.f64 x-scale (PI.f64))) #s(literal 90 binary64))))))))
(*.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 (* -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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 (/.f64 (*.f64 (*.f64 angle y-scale) (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64))))) (*.f64 x-scale (PI.f64))) #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 (* -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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 (/.f64 (*.f64 (*.f64 angle y-scale) (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64))))) (*.f64 x-scale (PI.f64))) #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 (* -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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 (/.f64 (*.f64 (*.f64 angle y-scale) (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64))))) (*.f64 x-scale (PI.f64))) #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 (* -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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 (/.f64 (*.f64 (*.f64 angle y-scale) (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64))))) (*.f64 x-scale (PI.f64))) #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 (* -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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 (/.f64 (*.f64 (*.f64 angle y-scale) (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64))))) (*.f64 x-scale (PI.f64))) #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)) #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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 (/.f64 (*.f64 (*.f64 angle y-scale) (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64))))) (*.f64 x-scale (PI.f64))) #s(literal 90 binary64)))))))))

eval114.0ms (1.1%)

Memory
7.2MiB live, 113.2MiB allocated; 14ms collecting garbage
Compiler

Compiled 89 663 to 8 783 computations (90.2% saved)

prune155.0ms (1.4%)

Memory
-6.7MiB live, 183.9MiB allocated; 8ms collecting garbage
Pruning

74 alts after pruning (73 fresh and 1 done)

PrunedKeptTotal
New83631867
Fresh124254
Picked415
Done000
Total85274926
Accuracy
82.7%
Counts
926 → 74
Alt Table
Click to see full alt table
StatusAccuracyProgram
46.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)) #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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 (/.f64 (*.f64 (*.f64 angle y-scale) (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64))))) (*.f64 x-scale (PI.f64))) #s(literal 90 binary64))))))) (PI.f64))
34.7%
(/.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)) #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 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) y-scale) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))))))))
46.3%
(/.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)) #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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 (/.f64 (*.f64 (*.f64 angle y-scale) (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64))))) (*.f64 x-scale (PI.f64))) #s(literal 90 binary64)))))))))
34.7%
(*.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 (* -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 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) y-scale) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))))) (PI.f64)) #s(literal 180 binary64))
11.4%
(*.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 b) (* a a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 y-scale (PI.f64)) angle)) #s(literal -90 binary64))))) (cbrt.f64 (PI.f64))))
45.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)) #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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 (/.f64 (*.f64 (*.f64 angle y-scale) (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64))))) (*.f64 x-scale (PI.f64))) #s(literal 90 binary64)))))) (cbrt.f64 (PI.f64))))
22.8%
(*.f64 #s(approx 180 #s(literal 0 binary64)) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))))) (PI.f64)))
7.8%
(*.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)))
6.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 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)))))) (*.f64 x-scale (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))))) (PI.f64)))
6.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 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a))) (*.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)))))) (*.f64 x-scale (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)))))))) (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 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-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 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a))))))) (PI.f64)))
12.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 (*.f64 (-.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))))) y-scale)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) angle)))))) (PI.f64)))
2.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 (*.f64 y-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 y-scale y-scale) (*.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)))
6.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 #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)) (*.f64 angle (*.f64 (PI.f64) #s(approx (- (pow b 2) (pow a 2)) (pow.f64 b #s(literal 2 binary64))))))))) (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 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)))
9.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 (*.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-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))))))) y-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (/.f64 x-scale (*.f64 (PI.f64) angle)))))) (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)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (/.f64 (*.f64 a a) y-scale) y-scale) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (/.f64 (*.f64 a a) y-scale) y-scale))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (-.f64 (*.f64 b b) (*.f64 a a)))))))) (PI.f64)))
10.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 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a 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))))) x-scale) (/.f64 (*.f64 b b) x-scale)) x-scale)) y-scale) (*.f64 (*.f64 (PI.f64) angle) (-.f64 (*.f64 b b) (*.f64 a a)))))))) (PI.f64)))
7.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 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 (*.f64 b b) y-scale) y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 a a))) y-scale) (*.f64 (*.f64 x-scale x-scale) y-scale))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (-.f64 (*.f64 b b) (*.f64 a a)))))))) (PI.f64)))
9.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 b (/.f64 b (*.f64 x-scale x-scale))) y-scale) (/.f64 (*.f64 a a) y-scale)) y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (-.f64 (*.f64 b b) (*.f64 a a)))))))) (PI.f64)))
7.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 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (/.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 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) angle))))))) (PI.f64)))
7.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 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (/.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 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) #s(approx (- (* b b) (* a a)) (pow.f64 b #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 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (/.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 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) #s(approx (- (* b b) (* a a)) (*.f64 #s(literal -1 binary64) (pow.f64 a #s(literal 2 binary64)))))))))) (PI.f64)))
5.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 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (exp.f64 (*.f64 (log.f64 y-scale) #s(literal 2 binary64)))) (+.f64 (fabs.f64 (/.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 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (-.f64 (*.f64 b b) (*.f64 a a)))))))) (PI.f64)))
7.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 x-scale (/.f64 (*.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (+.f64 (fabs.f64 (/.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 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (-.f64 (*.f64 b b) (*.f64 a a)))))))) (PI.f64)))
2.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 #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)) (*.f64 (*.f64 (PI.f64) angle) (-.f64 (*.f64 b b) (*.f64 a a)))))))) (PI.f64)))
14.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 a (/.f64 a (*.f64 y-scale y-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 (+.f64 b a) (-.f64 b a)) (PI.f64))) (/.f64 y-scale angle)))))) (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)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale #s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (/ (- (* (* b b) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a a)))) (/.f64 #s(literal -1 binary64) (*.f64 angle (*.f64 y-scale (PI.f64))))))))) (PI.f64)))
34.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 90 binary64) (*.f64 x-scale #s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (/ (- (* (* b b) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a a)))) (*.f64 #s(literal -1 binary64) (/.f64 y-scale (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (PI.f64)))))))))) (PI.f64)))
20.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)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (/.f64 (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)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (/.f64 (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.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 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 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) #s(literal 4 binary64))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) (*.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (PI.f64)))
19.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 #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))) (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) 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)))
20.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 #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 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (/.f64 (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)))))))))) (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) (/.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)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64)) (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)))
13.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))) (exp.f64 (*.f64 (log.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) 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)))
17.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 #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 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)))))) (*.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)))
19.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 #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 (exp.f64 (*.f64 (log.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)))
23.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 (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)))
20.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 #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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 y-scale (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (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 -1/2 binary64) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (+.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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)))
39.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 #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)))
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)) #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.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 b) (* a a)))))) (*.f64 (/.f64 #s(literal -90 binary64) (*.f64 y-scale (PI.f64))) (/.f64 x-scale angle))))) (PI.f64)))
30.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 (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a a)))))) (*.f64 #s(literal -90 binary64) (/.f64 y-scale (*.f64 angle (*.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 b) (* a a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 (*.f64 angle y-scale) (PI.f64))))))) (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)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 angle (log.f64 (pow.f64 (exp.f64 (PI.f64)) y-scale)))))))) (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)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (log.f64 (pow.f64 (exp.f64 (PI.f64)) (*.f64 angle y-scale)))))))) (PI.f64)))
36.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)) #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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (/.f64 (*.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) y-scale) x-scale))))) (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)) #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 (*.f64 (PI.f64) angle) #s(literal 180 binary64))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (/.f64 (*.f64 (PI.f64) angle) #s(literal 180 binary64))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (/.f64 (*.f64 (PI.f64) angle) #s(literal 180 binary64))) (sin.f64 (/.f64 (*.f64 (PI.f64) angle) #s(literal 180 binary64)))))))))) (PI.f64)))
40.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 (* -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 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))))) (PI.f64)))
40.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 (* -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 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle))))))))))) (PI.f64)))
40.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 (* -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 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle))))))))))) (PI.f64)))
39.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 (* -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 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle))))))))))) (PI.f64)))
42.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 (* -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 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 #s(approx (cos (/ 1 (/ 180 (* (PI) angle)))) #s(literal 1 binary64)) (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle))))))))))) (PI.f64)))
39.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 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 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 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (PI.f64)))
26.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 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 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 (-.f64 (cos.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64)) (PI.f64)) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (cos.f64 (+.f64 (/.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64)) (PI.f64)) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 2 binary64)))))))) (PI.f64)))
41.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 (* -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 (sin.f64 (/.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64)) (PI.f64)) #s(literal 2 binary64))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64)))
40.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)) #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 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (/.f64 (PI.f64) #s(literal 2 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)) #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 #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)) #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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/.f64 (*.f64 #s(literal 90 binary64) (*.f64 (*.f64 angle y-scale) (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 x-scale (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)) #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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 #s(literal 90 binary64) (/.f64 (/.f64 (*.f64 (*.f64 angle y-scale) (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64))))) x-scale) (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)) #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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 angle (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 4/3 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale (PI.f64)))))))) (PI.f64)))
35.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 (* -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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 angle (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (log.f64 (pow.f64 (exp.f64 (PI.f64)) x-scale)))))))) (PI.f64)))
52.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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64)))) y-scale) x-scale) (/.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)) #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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 (*.f64 angle y-scale) (PI.f64)) (/.f64 (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64)))) x-scale))))))) (PI.f64)))
52.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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 #s(literal 90 binary64) (*.f64 angle (/.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64)))) y-scale) (*.f64 x-scale (PI.f64))))))))) (PI.f64)))
22.2%
(*.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)) (*.f64 (/.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) y-scale) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale))))))))
26.4%
(*.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)) (*.f64 (*.f64 y-scale (/.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) angle) #s(literal 1/90 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) (/.f64 (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) (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))))))
25.1%
(*.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)) (*.f64 (*.f64 y-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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* (cos (* (* (* (PI) angle) 1/180) 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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))))))
26.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)) (*.f64 (*.f64 y-scale (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (* (* (* (PI) angle) 1/180) 2))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))))))
37.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)) (*.f64 (*.f64 y-scale #s(approx (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (- (* b b) (* a a)) (sin (* (* (PI) angle) 1/180))))) (/.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 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) #s(literal -1/2 binary64)))))))
32.1%
(*.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)) (*.f64 (*.f64 y-scale #s(approx (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (- (* b b) (* a a)) (sin (* (* (PI) angle) 1/180))))) (*.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 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) #s(literal -1/2 binary64)))))))
37.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)) (*.f64 #s(approx (* y-scale (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (- (* b b) (* a a)) (sin (* (* (PI) angle) 1/180)))))) (/.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(literal -1/2 binary64)))))))
32.1%
(*.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 (* (* y-scale (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (- (* b b) (* a a)) (sin (* (* (PI) angle) 1/180)))))) -1/2) (*.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))))))))))))))
Compiler

Compiled 3 668 to 833 computations (77.3% saved)

regimes781.0ms (7.2%)

Memory
-2.4MiB live, 427.1MiB allocated; 25ms collecting garbage
Counts
2 → 1
4 → 1
8 → 3
30 → 2
35 → 2
46 → 2
57 → 2
80 → 2
153 → 2
Calls
Call 1
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 b) (* a 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 b) (* a 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 b) (* a a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))))) (PI.f64)))
Call 2
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 b) (* a 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 b) (* a 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 b) (* a 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 b) (* a a)))))) (*.f64 #s(literal -90 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-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 b) (* a a)))))) (*.f64 #s(literal -90 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64)))))))) (PI.f64)))
Call 3
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 b) (* a 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 b) (* a 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 b) (* a 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 b) (* a a)))))) (*.f64 #s(literal -90 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64)))))))) (PI.f64)))
(*.f64 #s(approx 180 #s(literal 0 binary64)) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a 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)) (*.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 b) (* a 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)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale #s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (/ (- (* (* b b) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a 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 b) (* a a)))))) (*.f64 (/.f64 #s(literal -90 binary64) (*.f64 y-scale (PI.f64))) (/.f64 x-scale 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)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a a)))))) (*.f64 #s(literal -90 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64)))))))) (PI.f64)))
(*.f64 #s(approx 180 #s(literal 0 binary64)) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a 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 b) (* a a)))))) (*.f64 #s(literal -90 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64)))))))) (PI.f64)))
Call 4
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 b) (* a 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 b) (* a 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 b) (* a 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 b) (* a a)))))) (*.f64 #s(literal -90 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64)))))))) (PI.f64)))
(*.f64 #s(approx 180 #s(literal 0 binary64)) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a 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)) (*.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 b) (* a 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)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale #s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (/ (- (* (* b b) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a 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 b) (* a a)))))) (*.f64 (/.f64 #s(literal -90 binary64) (*.f64 y-scale (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 #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 b) (* a 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 #s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (/ (- (* (* b b) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a 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 a (/.f64 a (*.f64 y-scale y-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))))))) 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 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))))) 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 #s(literal 90 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-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 (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 a (/.f64 a (*.f64 y-scale y-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 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 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 (*.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 b) (*.f64 a a)))))) (PI.f64)))
(*.f64 #s(approx 180 #s(literal 0 binary64)) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (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 b) (*.f64 a 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 (*.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 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 x-scale (*.f64 (/.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-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 (+.f64 b a) (-.f64 b a)) (PI.f64))) (/.f64 y-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 a (/.f64 a (*.f64 y-scale y-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))))))) y-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (/.f64 x-scale (*.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 (/.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 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 (-.f64 (*.f64 b b) (*.f64 a 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 b (/.f64 b (*.f64 x-scale x-scale))) y-scale) (/.f64 (*.f64 a a) y-scale)) y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (-.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 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (/.f64 (-.f64 (*.f64 (*.f64 b (/.f64 b (*.f64 x-scale x-scale))) y-scale) (/.f64 (*.f64 a a) y-scale)) y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (-.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 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a 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))))) x-scale) (/.f64 (*.f64 b b) x-scale)) x-scale)) y-scale) (*.f64 (*.f64 (PI.f64) angle) (-.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 (/.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) (/.f64 (pow.f64 a #s(literal 2 binary64)) y-scale)) (*.f64 (*.f64 (PI.f64) angle) (-.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 (/.f64 (*.f64 (-.f64 (/.f64 (/.f64 (*.f64 a a) y-scale) y-scale) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (/.f64 (*.f64 a a) y-scale) y-scale))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (-.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 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (/.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 b 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 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (+.f64 (fabs.f64 (/.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 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (-.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 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (/.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 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (-.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 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 b) (* a 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(approx 180 #s(literal 0 binary64)) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))))) (PI.f64)))
Call 5
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 b) (* a 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 b) (* a 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 b) (* a 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 b) (* a a)))))) (*.f64 #s(literal -90 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64)))))))) (PI.f64)))
(*.f64 #s(approx 180 #s(literal 0 binary64)) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a 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)) (*.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 b) (* a 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)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale #s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (/ (- (* (* b b) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a 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 b) (* a a)))))) (*.f64 (/.f64 #s(literal -90 binary64) (*.f64 y-scale (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 #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 b) (* a 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 #s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (/ (- (* (* b b) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a 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 a (/.f64 a (*.f64 y-scale y-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))))))) 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 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))))) 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 #s(literal 90 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-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 (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 a (/.f64 a (*.f64 y-scale y-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 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 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 (*.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 b) (*.f64 a a)))))) (PI.f64)))
(*.f64 #s(approx 180 #s(literal 0 binary64)) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (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 b) (*.f64 a 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 (*.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 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 x-scale (*.f64 (/.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-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 (+.f64 b a) (-.f64 b a)) (PI.f64))) (/.f64 y-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 a (/.f64 a (*.f64 y-scale y-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))))))) y-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (/.f64 x-scale (*.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 (/.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 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 (-.f64 (*.f64 b b) (*.f64 a 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 b (/.f64 b (*.f64 x-scale x-scale))) y-scale) (/.f64 (*.f64 a a) y-scale)) y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (-.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 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (/.f64 (-.f64 (*.f64 (*.f64 b (/.f64 b (*.f64 x-scale x-scale))) y-scale) (/.f64 (*.f64 a a) y-scale)) y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (-.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 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a 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))))) x-scale) (/.f64 (*.f64 b b) x-scale)) x-scale)) y-scale) (*.f64 (*.f64 (PI.f64) angle) (-.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 (/.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) (/.f64 (pow.f64 a #s(literal 2 binary64)) y-scale)) (*.f64 (*.f64 (PI.f64) angle) (-.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 (/.f64 (*.f64 (-.f64 (/.f64 (/.f64 (*.f64 a a) y-scale) y-scale) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (/.f64 (*.f64 a a) y-scale) y-scale))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (-.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 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (/.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 b 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 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (+.f64 (fabs.f64 (/.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 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (-.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 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (/.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 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (-.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)) #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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 #s(literal 90 binary64) (*.f64 angle (/.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64)))) y-scale) (*.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 (* -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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/.f64 (*.f64 #s(literal 90 binary64) (*.f64 (*.f64 angle y-scale) (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 x-scale (PI.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 (* -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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 (/.f64 (*.f64 (*.f64 angle y-scale) (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64))))) (*.f64 x-scale (PI.f64))) #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 (*.f64 (*.f64 (*.f64 b b) y-scale) y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 a a))) y-scale) (*.f64 (*.f64 x-scale x-scale) y-scale))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (-.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)) #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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 (*.f64 angle y-scale) (PI.f64)) (/.f64 (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64)))) x-scale))))))) (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 b) (* a 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 (* -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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 #s(literal 90 binary64) (*.f64 angle (/.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64)))) y-scale) (*.f64 x-scale (PI.f64))))))))) (PI.f64)))
Call 6
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 b) (* a 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 b) (* a 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 b) (* a 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 b) (* a a)))))) (*.f64 #s(literal -90 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64)))))))) (PI.f64)))
(*.f64 #s(approx 180 #s(literal 0 binary64)) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a 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)) (*.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 b) (* a 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)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale #s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (/ (- (* (* b b) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a 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 b) (* a a)))))) (*.f64 (/.f64 #s(literal -90 binary64) (*.f64 y-scale (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 #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 b) (* a 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 #s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (/ (- (* (* b b) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a 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 a (/.f64 a (*.f64 y-scale y-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))))))) 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 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))))) 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 #s(literal 90 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-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 (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 a (/.f64 a (*.f64 y-scale y-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 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 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 (*.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 b) (*.f64 a a)))))) (PI.f64)))
(*.f64 #s(approx 180 #s(literal 0 binary64)) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (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 b) (*.f64 a 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 (*.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 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 x-scale (*.f64 (/.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-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 (+.f64 b a) (-.f64 b a)) (PI.f64))) (/.f64 y-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 a (/.f64 a (*.f64 y-scale y-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))))))) y-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (/.f64 x-scale (*.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 (/.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 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 (-.f64 (*.f64 b b) (*.f64 a 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 b (/.f64 b (*.f64 x-scale x-scale))) y-scale) (/.f64 (*.f64 a a) y-scale)) y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (-.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 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (/.f64 (-.f64 (*.f64 (*.f64 b (/.f64 b (*.f64 x-scale x-scale))) y-scale) (/.f64 (*.f64 a a) y-scale)) y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (-.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 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a 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))))) x-scale) (/.f64 (*.f64 b b) x-scale)) x-scale)) y-scale) (*.f64 (*.f64 (PI.f64) angle) (-.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 (/.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) (/.f64 (pow.f64 a #s(literal 2 binary64)) y-scale)) (*.f64 (*.f64 (PI.f64) angle) (-.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 (/.f64 (*.f64 (-.f64 (/.f64 (/.f64 (*.f64 a a) y-scale) y-scale) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (/.f64 (*.f64 a a) y-scale) y-scale))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (-.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 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (/.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 b 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 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (+.f64 (fabs.f64 (/.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 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (-.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 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (/.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 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (-.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)) #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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 #s(literal 90 binary64) (*.f64 angle (/.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64)))) y-scale) (*.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 (* -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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/.f64 (*.f64 #s(literal 90 binary64) (*.f64 (*.f64 angle y-scale) (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 x-scale (PI.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 (* -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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 (/.f64 (*.f64 (*.f64 angle y-scale) (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64))))) (*.f64 x-scale (PI.f64))) #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 (*.f64 (*.f64 (*.f64 b b) y-scale) y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 a a))) y-scale) (*.f64 (*.f64 x-scale x-scale) y-scale))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (-.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)) #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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 (*.f64 angle y-scale) (PI.f64)) (/.f64 (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64)))) 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)) #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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64)))) y-scale) x-scale) (/.f64 angle (PI.f64)))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 #s(literal 90 binary64) (/.f64 (/.f64 (*.f64 (*.f64 angle y-scale) (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64))))) x-scale) (PI.f64))))))) (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)) #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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 (/.f64 (*.f64 (*.f64 angle y-scale) (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64))))) (*.f64 x-scale (PI.f64))) #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)) (/.f64 (*.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)))))) (*.f64 x-scale (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 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)) (*.f64 (/.f64 #s(literal 90 binary64) (*.f64 (PI.f64) angle)) (/.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 x-scale (/.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 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 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 (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a))) (*.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)))))) (*.f64 x-scale (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)))))))) (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 b) (* a a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 y-scale (PI.f64)) angle)) #s(literal -90 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 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (/.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 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) #s(approx (- (* b b) (* a 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 (*.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 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) #s(approx (- (* b b) (* a 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)) #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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 angle (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (*.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 (* -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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 angle (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 4/3 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-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 b) (* a 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 (* -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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64)))) y-scale) x-scale) (/.f64 angle (PI.f64)))))))) (PI.f64)))
Call 7
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 b) (* a 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 b) (* a 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 b) (* a 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 b) (* a a)))))) (*.f64 #s(literal -90 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64)))))))) (PI.f64)))
(*.f64 #s(approx 180 #s(literal 0 binary64)) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a 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)) (*.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 b) (* a 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)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale #s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (/ (- (* (* b b) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a 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 b) (* a a)))))) (*.f64 (/.f64 #s(literal -90 binary64) (*.f64 y-scale (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 #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 b) (* a 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 #s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (/ (- (* (* b b) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a 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 a (/.f64 a (*.f64 y-scale y-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))))))) 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 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))))) 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 #s(literal 90 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-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 (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 a (/.f64 a (*.f64 y-scale y-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 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 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 (*.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 b) (*.f64 a a)))))) (PI.f64)))
(*.f64 #s(approx 180 #s(literal 0 binary64)) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (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 b) (*.f64 a 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 (*.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 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 x-scale (*.f64 (/.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-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 (+.f64 b a) (-.f64 b a)) (PI.f64))) (/.f64 y-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 a (/.f64 a (*.f64 y-scale y-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))))))) y-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (/.f64 x-scale (*.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 (/.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 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 (-.f64 (*.f64 b b) (*.f64 a 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 b (/.f64 b (*.f64 x-scale x-scale))) y-scale) (/.f64 (*.f64 a a) y-scale)) y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (-.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 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (/.f64 (-.f64 (*.f64 (*.f64 b (/.f64 b (*.f64 x-scale x-scale))) y-scale) (/.f64 (*.f64 a a) y-scale)) y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (-.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 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a 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))))) x-scale) (/.f64 (*.f64 b b) x-scale)) x-scale)) y-scale) (*.f64 (*.f64 (PI.f64) angle) (-.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 (/.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) (/.f64 (pow.f64 a #s(literal 2 binary64)) y-scale)) (*.f64 (*.f64 (PI.f64) angle) (-.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 (/.f64 (*.f64 (-.f64 (/.f64 (/.f64 (*.f64 a a) y-scale) y-scale) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (/.f64 (*.f64 a a) y-scale) y-scale))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (-.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 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (/.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 b 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 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (+.f64 (fabs.f64 (/.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 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (-.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 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (/.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 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (-.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)) #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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 #s(literal 90 binary64) (*.f64 angle (/.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64)))) y-scale) (*.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 (* -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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/.f64 (*.f64 #s(literal 90 binary64) (*.f64 (*.f64 angle y-scale) (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 x-scale (PI.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 (* -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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 (/.f64 (*.f64 (*.f64 angle y-scale) (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64))))) (*.f64 x-scale (PI.f64))) #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 (*.f64 (*.f64 (*.f64 b b) y-scale) y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 a a))) y-scale) (*.f64 (*.f64 x-scale x-scale) y-scale))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (-.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)) #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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 (*.f64 angle y-scale) (PI.f64)) (/.f64 (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64)))) 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)) #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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64)))) y-scale) x-scale) (/.f64 angle (PI.f64)))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 #s(literal 90 binary64) (/.f64 (/.f64 (*.f64 (*.f64 angle y-scale) (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64))))) x-scale) (PI.f64))))))) (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)) #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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 (/.f64 (*.f64 (*.f64 angle y-scale) (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64))))) (*.f64 x-scale (PI.f64))) #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)) (/.f64 (*.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)))))) (*.f64 x-scale (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 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)) (*.f64 (/.f64 #s(literal 90 binary64) (*.f64 (PI.f64) angle)) (/.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 x-scale (/.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 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 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 (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a))) (*.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)))))) (*.f64 x-scale (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)))))))) (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 b) (* a a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 y-scale (PI.f64)) angle)) #s(literal -90 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 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (/.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 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) #s(approx (- (* b b) (* a 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 (*.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 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) #s(approx (- (* b b) (* a 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)) #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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 angle (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (*.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 (* -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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 angle (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 4/3 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (*.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 (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (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 #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)) (*.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)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a 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 b) (* a 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 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 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) y-scale)) (*.f64 angle (*.f64 (PI.f64) #s(approx (- (pow b 2) (pow a 2)) (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) (exp.f64 (*.f64 (log.f64 y-scale) #s(literal 2 binary64)))) (+.f64 (fabs.f64 (/.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 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (-.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 y-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 y-scale y-scale) (*.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 (/.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 (* -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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 (/.f64 (*.f64 (*.f64 angle y-scale) (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64))))) (*.f64 x-scale (PI.f64))) #s(literal 90 binary64)))))) (cbrt.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 (* (* y-scale (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (- (* b b) (* a a)) (sin (* (* (PI) angle) 1/180)))))) -1/2) (*.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))))))))))))))
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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64)))) y-scale) x-scale) (/.f64 angle (PI.f64)))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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)))
Call 8
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 b) (* a 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 b) (* a 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 b) (* a 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 b) (* a a)))))) (*.f64 #s(literal -90 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64)))))))) (PI.f64)))
(*.f64 #s(approx 180 #s(literal 0 binary64)) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a 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)) (*.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 b) (* a 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)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale #s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (/ (- (* (* b b) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a 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 b) (* a a)))))) (*.f64 (/.f64 #s(literal -90 binary64) (*.f64 y-scale (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 #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 b) (* a 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 #s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (/ (- (* (* b b) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a 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 a (/.f64 a (*.f64 y-scale y-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))))))) 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 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))))) 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 #s(literal 90 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-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 (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 a (/.f64 a (*.f64 y-scale y-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 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 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 (*.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 b) (*.f64 a a)))))) (PI.f64)))
(*.f64 #s(approx 180 #s(literal 0 binary64)) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (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 b) (*.f64 a 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 (*.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 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 x-scale (*.f64 (/.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-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 (+.f64 b a) (-.f64 b a)) (PI.f64))) (/.f64 y-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 a (/.f64 a (*.f64 y-scale y-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))))))) y-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (/.f64 x-scale (*.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 (/.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 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 (-.f64 (*.f64 b b) (*.f64 a 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 b (/.f64 b (*.f64 x-scale x-scale))) y-scale) (/.f64 (*.f64 a a) y-scale)) y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (-.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 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (/.f64 (-.f64 (*.f64 (*.f64 b (/.f64 b (*.f64 x-scale x-scale))) y-scale) (/.f64 (*.f64 a a) y-scale)) y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (-.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 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a 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))))) x-scale) (/.f64 (*.f64 b b) x-scale)) x-scale)) y-scale) (*.f64 (*.f64 (PI.f64) angle) (-.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 (/.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) (/.f64 (pow.f64 a #s(literal 2 binary64)) y-scale)) (*.f64 (*.f64 (PI.f64) angle) (-.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 (/.f64 (*.f64 (-.f64 (/.f64 (/.f64 (*.f64 a a) y-scale) y-scale) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (/.f64 (*.f64 a a) y-scale) y-scale))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (-.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 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (/.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 b 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 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (+.f64 (fabs.f64 (/.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 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (-.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 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (/.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 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (-.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)) #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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 #s(literal 90 binary64) (*.f64 angle (/.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64)))) y-scale) (*.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 (* -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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/.f64 (*.f64 #s(literal 90 binary64) (*.f64 (*.f64 angle y-scale) (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 x-scale (PI.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 (* -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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 (/.f64 (*.f64 (*.f64 angle y-scale) (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64))))) (*.f64 x-scale (PI.f64))) #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 (*.f64 (*.f64 (*.f64 b b) y-scale) y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 a a))) y-scale) (*.f64 (*.f64 x-scale x-scale) y-scale))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (-.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)) #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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 (*.f64 angle y-scale) (PI.f64)) (/.f64 (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64)))) 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)) #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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64)))) y-scale) x-scale) (/.f64 angle (PI.f64)))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 #s(literal 90 binary64) (/.f64 (/.f64 (*.f64 (*.f64 angle y-scale) (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64))))) x-scale) (PI.f64))))))) (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)) #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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 (/.f64 (*.f64 (*.f64 angle y-scale) (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64))))) (*.f64 x-scale (PI.f64))) #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)) (/.f64 (*.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)))))) (*.f64 x-scale (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 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)) (*.f64 (/.f64 #s(literal 90 binary64) (*.f64 (PI.f64) angle)) (/.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 x-scale (/.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 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 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 (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a))) (*.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)))))) (*.f64 x-scale (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)))))))) (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 b) (* a a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 y-scale (PI.f64)) angle)) #s(literal -90 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 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (/.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 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) #s(approx (- (* b b) (* a 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 (*.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 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) #s(approx (- (* b b) (* a 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)) #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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 angle (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (*.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 (* -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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 angle (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 4/3 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (*.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 (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (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 #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)) (*.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)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a 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 b) (* a 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 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 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) y-scale)) (*.f64 angle (*.f64 (PI.f64) #s(approx (- (pow b 2) (pow a 2)) (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) (exp.f64 (*.f64 (log.f64 y-scale) #s(literal 2 binary64)))) (+.f64 (fabs.f64 (/.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 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (-.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 y-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 y-scale y-scale) (*.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 (/.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 (* -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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 (/.f64 (*.f64 (*.f64 angle y-scale) (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64))))) (*.f64 x-scale (PI.f64))) #s(literal 90 binary64)))))) (cbrt.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 (* (* y-scale (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (- (* b b) (* a a)) (sin (* (* (PI) angle) 1/180)))))) -1/2) (*.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 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)) (*.f64 #s(approx (* y-scale (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (- (* b b) (* a a)) (sin (* (* (PI) angle) 1/180)))))) (/.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(literal -1/2 binary64)))))))
(*.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)) (*.f64 (*.f64 y-scale #s(approx (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (- (* b b) (* a a)) (sin (* (* (PI) angle) 1/180))))) (/.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 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) #s(literal -1/2 binary64)))))))
(*.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)) (*.f64 (*.f64 y-scale #s(approx (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (- (* b b) (* a a)) (sin (* (* (PI) angle) 1/180))))) (*.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 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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)) #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 #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)) (*.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 #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 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)) #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)))) #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)))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 angle (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (log.f64 (pow.f64 (exp.f64 (PI.f64)) 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)) #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 #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)) #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 #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 (-.f64 #s(literal 1/2 binary64) #s(approx (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (* (* (* (PI) angle) 1/180) 2))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))))))
(*.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)) (*.f64 (*.f64 y-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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* (cos (* (* (* (PI) angle) 1/180) 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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #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 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 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/.f64 (*.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) y-scale) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #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)) #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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (/.f64 (*.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) 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)) #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 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) y-scale) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #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)) #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 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 #s(approx (cos (/ 1 (/ 180 (* (PI) angle)))) #s(literal 1 binary64)) (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.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 -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)) (*.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 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (PI.f64)))
Outputs
(*.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)) (*.f64 #s(approx (* y-scale (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (- (* b b) (* a a)) (sin (* (* (PI) angle) 1/180)))))) (/.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(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)) #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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64)))) y-scale) x-scale) (/.f64 angle (PI.f64)))))))) (PI.f64)))
Call 9
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 b) (* a 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 b) (* a 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 b) (* a 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 b) (* a a)))))) (*.f64 #s(literal -90 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64)))))))) (PI.f64)))
(*.f64 #s(approx 180 #s(literal 0 binary64)) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a 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)) (*.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 b) (* a 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)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale #s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (/ (- (* (* b b) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a 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 b) (* a a)))))) (*.f64 (/.f64 #s(literal -90 binary64) (*.f64 y-scale (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 #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 b) (* a 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 #s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (/ (- (* (* b b) y-scale) (* (* x-scale x-scale) (/ (* a a) y-scale))) (* (* x-scale x-scale) y-scale))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a 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 a (/.f64 a (*.f64 y-scale y-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))))))) 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 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))))) 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 #s(literal 90 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-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 (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 a (/.f64 a (*.f64 y-scale y-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 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 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 (*.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 b) (*.f64 a a)))))) (PI.f64)))
(*.f64 #s(approx 180 #s(literal 0 binary64)) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (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 b) (*.f64 a 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 (*.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 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 x-scale (*.f64 (/.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-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 (+.f64 b a) (-.f64 b a)) (PI.f64))) (/.f64 y-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 a (/.f64 a (*.f64 y-scale y-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))))))) y-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (/.f64 x-scale (*.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 (/.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 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 (-.f64 (*.f64 b b) (*.f64 a 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 b (/.f64 b (*.f64 x-scale x-scale))) y-scale) (/.f64 (*.f64 a a) y-scale)) y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (-.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 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (/.f64 (-.f64 (*.f64 (*.f64 b (/.f64 b (*.f64 x-scale x-scale))) y-scale) (/.f64 (*.f64 a a) y-scale)) y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (-.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 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a 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))))) x-scale) (/.f64 (*.f64 b b) x-scale)) x-scale)) y-scale) (*.f64 (*.f64 (PI.f64) angle) (-.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 (/.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) (/.f64 (pow.f64 a #s(literal 2 binary64)) y-scale)) (*.f64 (*.f64 (PI.f64) angle) (-.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 (/.f64 (*.f64 (-.f64 (/.f64 (/.f64 (*.f64 a a) y-scale) y-scale) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (/.f64 (*.f64 a a) y-scale) y-scale))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (-.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 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (/.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 b 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 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (+.f64 (fabs.f64 (/.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 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (-.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 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (/.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 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (-.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)) #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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 #s(literal 90 binary64) (*.f64 angle (/.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64)))) y-scale) (*.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 (* -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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/.f64 (*.f64 #s(literal 90 binary64) (*.f64 (*.f64 angle y-scale) (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 x-scale (PI.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 (* -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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 (/.f64 (*.f64 (*.f64 angle y-scale) (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64))))) (*.f64 x-scale (PI.f64))) #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 (*.f64 (*.f64 (*.f64 b b) y-scale) y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 a a))) y-scale) (*.f64 (*.f64 x-scale x-scale) y-scale))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (-.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)) #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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 (*.f64 angle y-scale) (PI.f64)) (/.f64 (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64)))) 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)) #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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64)))) y-scale) x-scale) (/.f64 angle (PI.f64)))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 #s(literal 90 binary64) (/.f64 (/.f64 (*.f64 (*.f64 angle y-scale) (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64))))) x-scale) (PI.f64))))))) (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)) #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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 (/.f64 (*.f64 (*.f64 angle y-scale) (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64))))) (*.f64 x-scale (PI.f64))) #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)) (/.f64 (*.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)))))) (*.f64 x-scale (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 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)) (*.f64 (/.f64 #s(literal 90 binary64) (*.f64 (PI.f64) angle)) (/.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 x-scale (/.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 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 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 (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a))) (*.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)))))) (*.f64 x-scale (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)))))))) (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 b) (* a a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 y-scale (PI.f64)) angle)) #s(literal -90 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 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (/.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 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) #s(approx (- (* b b) (* a 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 (*.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 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) #s(approx (- (* b b) (* a 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)) #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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 angle (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (*.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 (* -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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 angle (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 4/3 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (*.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 (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (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 #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)) (*.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)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (- (* b b) (* a 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 b) (* a 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 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 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) y-scale)) (*.f64 angle (*.f64 (PI.f64) #s(approx (- (pow b 2) (pow a 2)) (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) (exp.f64 (*.f64 (log.f64 y-scale) #s(literal 2 binary64)))) (+.f64 (fabs.f64 (/.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 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (-.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 y-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 y-scale y-scale) (*.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 (/.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 (* -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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 (/.f64 (*.f64 (*.f64 angle y-scale) (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64))))) (*.f64 x-scale (PI.f64))) #s(literal 90 binary64)))))) (cbrt.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 (* (* y-scale (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (- (* b b) (* a a)) (sin (* (* (PI) angle) 1/180)))))) -1/2) (*.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 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)) (*.f64 #s(approx (* y-scale (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (- (* b b) (* a a)) (sin (* (* (PI) angle) 1/180)))))) (/.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(literal -1/2 binary64)))))))
(*.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)) (*.f64 (*.f64 y-scale #s(approx (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (- (* b b) (* a a)) (sin (* (* (PI) angle) 1/180))))) (/.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 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) #s(literal -1/2 binary64)))))))
(*.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)) (*.f64 (*.f64 y-scale #s(approx (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2)) a) a))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (- (* b b) (* a a)) (sin (* (* (PI) angle) 1/180))))) (*.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 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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)) #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 #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)) (*.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 #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 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)) #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)))) #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)))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 angle (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (log.f64 (pow.f64 (exp.f64 (PI.f64)) 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)) #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 #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)) #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 #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 (-.f64 #s(literal 1/2 binary64) #s(approx (* -1/2 (cos (* (* (* (PI) angle) 1/180) 2))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (* (* (* (PI) angle) 1/180) 2))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))))))
(*.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)) (*.f64 (*.f64 y-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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* (cos (* (* (* (PI) angle) 1/180) 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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* (cos (* (* (* (PI) angle) 1/180) 2)) 1/2) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #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 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 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/.f64 (*.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) y-scale) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #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)) #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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (/.f64 (*.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) 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)) #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 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) y-scale) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #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)) #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 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 #s(approx (cos (/ 1 (/ 180 (* (PI) angle)))) #s(literal 1 binary64)) (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.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 -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)) (*.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 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 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 (+.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)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (sin.f64 (/.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64)) (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)) #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 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (/.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)) #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 (*.f64 (PI.f64) angle) #s(literal 180 binary64))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (/.f64 (*.f64 (PI.f64) angle) #s(literal 180 binary64))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (/.f64 (*.f64 (PI.f64) angle) #s(literal 180 binary64))) (sin.f64 (/.f64 (*.f64 (PI.f64) angle) #s(literal 180 binary64)))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.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)) #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 (-.f64 (cos.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64)) (PI.f64)) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (cos.f64 (+.f64 (/.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64)) (PI.f64)) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #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 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.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)) #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 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.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 -1/2 binary64) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (+.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) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow 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 #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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) a) #s(literal 4 binary64)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 y-scale (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (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)) (*.f64 (/.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)))) y-scale) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale))))))))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) y-scale)) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #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 #s(literal -1/2 binary64) (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) y-scale) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) y-scale) x-scale)))) (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)) (*.f64 (*.f64 y-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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #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 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 #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 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) (/.f64 (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) (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #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) #s(approx (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))) (/.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))) (sqrt.f64 (/.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 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)))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow 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) (/.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 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)))))) (*.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 (*.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)))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 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 (/.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 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #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 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #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 (*.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))))) #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)))))) (*.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 #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 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 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 4 binary64))))) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #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)) #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) #s(approx (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (*.f64 angle (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 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/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal -1/102036672000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (*.f64 x-scale (PI.f64)))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #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)))))) (*.f64 x-scale (pow.f64 (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) (/.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))) (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) 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)) (*.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)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/90 binary64)) (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 #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))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 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 #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 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow 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))) (exp.f64 (*.f64 (log.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) 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 (/.f64 #s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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 #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 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (/.f64 (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)))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow 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 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) #s(literal 4 binary64))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) (*.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle)))) (-.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 #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 (exp.f64 (*.f64 (log.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 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow 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 b b) (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 (*.f64 b b) (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 b b) (pow.f64 a #s(literal 2 binary64)))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.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)))))) (*.f64 x-scale y-scale))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.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))))) 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))) (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) (/.f64 #s(literal 1 binary64) 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 (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 (PI.f64) angle) #s(literal 1/180 binary64)) (/.f64 (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)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (/.f64 (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 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.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 (-.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 a a) (*.f64 a a))) (+.f64 (*.f64 b b) (*.f64 a a)))) (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 (pow.f64 b #s(literal 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 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(approx 180 #s(literal 0 binary64)) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow 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)) #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)))))) (*.f64 (pow.f64 b #s(literal 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)) #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)))))) (*.f64 (pow.f64 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 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.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 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow 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 (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (+.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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)) (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (+.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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 (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 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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))))) (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))) 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)))) (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))) 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))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow 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 (/.f64 #s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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))))))) (/.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 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(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)) #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 #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(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 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)))))) (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 (*.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 #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(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 #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(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 #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 (/.f64 (*.f64 #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)))))))))))) (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/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)))))))))))) (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 (*.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))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (/ (- (* (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale) (* (* x-scale x-scale) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) y-scale))) (* (* x-scale x-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #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 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) 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))))))) y-scale))) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (/.f64 (pow.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))))))) 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))))))) y-scale)) #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)))))) (*.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)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.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(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.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 (pow.f64 b #s(literal 2 binary64)) (+.f64 #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 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) 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))))))) y-scale))) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 (/.f64 (pow.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))))))) 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))))))) y-scale)) #s(literal 2 binary64)) (pow.f64 y-scale #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 (/.f64 (pow.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))))))) 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))))))) y-scale)) #s(literal 2 binary64)) (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/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 (/.f64 (pow.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))))))) 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))))))) y-scale)) #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 (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 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)))))))))))) (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 (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)) #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))))))) #s(approx (* 1/2 (/ (* y-scale (+ (sqrt (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64)))) y-scale) x-scale) (/.f64 angle (PI.f64)))))))) (PI.f64)))
Calls

52 calls:

37.0ms
b
36.0ms
x-scale
36.0ms
y-scale
36.0ms
(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))
36.0ms
(/.f64 angle #s(literal 180 binary64))
Results
AccuracySegmentsBranch
11.6%1y-scale
11.6%1(/.f64 angle #s(literal 180 binary64))
11.6%1(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))
11.6%1a
11.6%1b
11.6%1angle
11.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))
11.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)))
11.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))
11.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)))
11.6%1x-scale
30.7%1a
30.7%1(/.f64 angle #s(literal 180 binary64))
30.7%1(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))
30.7%1b
30.7%1angle
30.7%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))
30.7%1x-scale
30.7%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)))
30.7%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))
30.7%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)))
30.7%1y-scale
37.7%3y-scale
35.8%2a
34.4%1x-scale
34.4%1(/.f64 angle #s(literal 180 binary64))
34.4%1(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))
34.4%1angle
34.4%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))
34.4%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)))
34.4%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))
34.4%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.8%3y-scale
34.4%1b
36.8%2a
56.0%2a
56.0%2a
55.3%2b
56.6%2b
56.2%2a
57.5%2a
55.0%2(/.f64 angle #s(literal 180 binary64))
55.0%2(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))
55.2%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))
55.2%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)))
55.2%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))
55.2%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)))
57.8%2a
57.3%2b
55.0%2angle
52.4%1x-scale
55.2%2y-scale
Compiler

Compiled 14 525 to 2 359 computations (83.8% saved)

bsearch85.0ms (0.8%)

Memory
9.1MiB live, 22.9MiB allocated; 2ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
74.0ms
4.661732653792563e-76
6.863084135013312e-73
Samples
31.0ms49×1valid
20.0ms23×2valid
12.0ms53×0valid
4.0ms3valid
Compiler

Compiled 732 to 431 computations (41.1% saved)

Precisions
Click to see histograms. Total time spent on operations: 58.0ms
ival-cosu: 11.0ms (18.8% of total, 0.7 MiB)
ival-sinu: 10.0ms (17.1% of total, 0.7 MiB)
ival-pow2: 9.0ms (15.4% of total, 2.4 MiB)
adjust: 7.0ms (12.0% of total, 0.8 MiB)
ival-div!: 7.0ms (12.0% of total, 1.0 MiB)
ival-mult!: 7.0ms (12.0% of total, 1.2 MiB)
ival-sqrt: 2.0ms (3.4% of total, 0.3 MiB)
ival-sub!: 2.0ms (3.4% of total, 0.5 MiB)
ival-add!: 2.0ms (3.4% of total, 0.4 MiB)
ival-atan: 1.0ms (1.7% of total, 0.3 MiB)

bsearch60.0ms (0.6%)

Memory
-0.4MiB live, 16.3MiB allocated; 1ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
52.0ms
1.91532284713851e-204
1.924238776668875e-203
Samples
19.0ms32×1valid
16.0ms19×2valid
9.0ms44×0valid
1.0ms3valid
Compiler

Compiled 556 to 347 computations (37.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 40.0ms
ival-cosu: 8.0ms (19.9% of total, 0.5 MiB)
ival-sinu: 6.0ms (14.9% of total, 0.5 MiB)
ival-pow2: 6.0ms (14.9% of total, 1.7 MiB)
adjust: 5.0ms (12.5% of total, 0.6 MiB)
ival-div!: 5.0ms (12.5% of total, 0.7 MiB)
ival-mult!: 5.0ms (12.5% of total, 0.9 MiB)
ival-sqrt: 1.0ms (2.5% of total, 0.3 MiB)
ival-sub!: 1.0ms (2.5% of total, 0.3 MiB)
ival-add!: 1.0ms (2.5% of total, 0.3 MiB)
ival-atan: 1.0ms (2.5% of total, 0.2 MiB)

bsearch77.0ms (0.7%)

Memory
-3.8MiB live, 20.8MiB allocated; 3ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
66.0ms
3.1295429556742393e+232
2.523370308396287e+236
Samples
25.0ms43×1valid
20.0ms24×2valid
13.0ms60×0valid
1.0ms3valid
Compiler

Compiled 604 to 415 computations (31.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 51.0ms
ival-cosu: 10.0ms (19.4% of total, 0.7 MiB)
ival-pow2: 9.0ms (17.5% of total, 2.3 MiB)
ival-sinu: 7.0ms (13.6% of total, 0.7 MiB)
ival-div!: 7.0ms (13.6% of total, 0.9 MiB)
ival-mult!: 7.0ms (13.6% of total, 1.2 MiB)
adjust: 6.0ms (11.7% of total, 0.7 MiB)
ival-sqrt: 2.0ms (3.9% of total, 0.3 MiB)
ival-sub!: 2.0ms (3.9% of total, 0.5 MiB)
ival-add!: 1.0ms (1.9% of total, 0.3 MiB)
ival-atan: 1.0ms (1.9% of total, 0.3 MiB)

bsearch11.0ms (0.1%)

Memory
3.4MiB live, 3.4MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
9.0ms
2.07536757160299e-215
2.1697482813052532e-215
Samples
4.0ms1valid
1.0ms0valid
1.0ms3valid
1.0ms2valid
Compiler

Compiled 213 to 83 computations (61.0% saved)

Precisions
Click to see histograms. Total time spent on operations: 7.0ms
adjust: 1.0ms (14.9% of total, 0.1 MiB)
ival-sinu: 1.0ms (14.9% of total, 0.1 MiB)
ival-pow2: 1.0ms (14.9% of total, 0.3 MiB)
ival-div!: 1.0ms (14.9% of total, 0.1 MiB)
ival-cosu: 1.0ms (14.9% of total, 0.1 MiB)
ival-mult!: 1.0ms (14.9% of total, 0.2 MiB)
ival-sqrt: 0.0ms (0.0% of total, 0.0 MiB)
ival-sub!: 0.0ms (0.0% of total, 0.1 MiB)
ival-add!: 0.0ms (0.0% of total, 0.0 MiB)
ival-atan: 0.0ms (0.0% of total, 0.0 MiB)

bsearch2.0ms (0.0%)

Memory
-6.4MiB live, 0.9MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
0.0ms
2.07536757160299e-215
2.1697482813052532e-215
Compiler

Compiled 213 to 83 computations (61.0% saved)

bsearch62.0ms (0.6%)

Memory
2.3MiB live, 16.7MiB allocated; 1ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
54.0ms
1.357631486023059e+183
4.5839673059583784e+184
Samples
23.0ms38×1valid
13.0ms59×0valid
12.0ms14×2valid
1.0ms3valid
Compiler

Compiled 410 to 264 computations (35.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 42.0ms
ival-cosu: 8.0ms (19.1% of total, 0.6 MiB)
ival-pow2: 7.0ms (16.7% of total, 1.8 MiB)
ival-sinu: 6.0ms (14.3% of total, 0.6 MiB)
ival-div!: 6.0ms (14.3% of total, 0.8 MiB)
adjust: 5.0ms (11.9% of total, 0.5 MiB)
ival-mult!: 5.0ms (11.9% of total, 1.0 MiB)
ival-sub!: 2.0ms (4.8% of total, 0.4 MiB)
ival-sqrt: 1.0ms (2.4% of total, 0.3 MiB)
ival-add!: 1.0ms (2.4% of total, 0.3 MiB)
ival-atan: 1.0ms (2.4% of total, 0.2 MiB)

bsearch134.0ms (1.2%)

Memory
3.2MiB live, 35.2MiB allocated; 2ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
73.0ms
1.376776189963456e-42
3.139501281086176e-35
45.0ms
-2.1680319989723956e-19
-1.0073801634906878e-19
Samples
44.0ms76×1valid
36.0ms44×2valid
22.0ms100×0valid
5.0ms3valid
Compiler

Compiled 564 to 411 computations (27.1% saved)

Precisions
Click to see histograms. Total time spent on operations: 94.0ms
ival-cosu: 17.0ms (18.1% of total, 1.1 MiB)
ival-pow2: 15.0ms (16.0% of total, 4.1 MiB)
ival-sinu: 14.0ms (14.9% of total, 1.2 MiB)
ival-div!: 13.0ms (13.8% of total, 1.7 MiB)
ival-mult!: 12.0ms (12.8% of total, 2.2 MiB)
adjust: 11.0ms (11.7% of total, 1.3 MiB)
ival-sub!: 4.0ms (4.3% of total, 0.8 MiB)
ival-sqrt: 3.0ms (3.2% of total, 0.6 MiB)
ival-add!: 3.0ms (3.2% of total, 0.6 MiB)
ival-atan: 2.0ms (2.1% of total, 0.5 MiB)

derivations129.0ms (1.2%)

Memory
-2.9MiB live, 15.6MiB allocated; 1ms collecting garbage
Stop Event
fuel
Compiler

Compiled 406 to 126 computations (69.0% saved)

preprocess123.0ms (1.1%)

Memory
-1.1MiB live, 118.0MiB allocated; 6ms collecting garbage
Compiler

Compiled 2 861 to 1 819 computations (36.4% saved)

end0.0ms (0.0%)

Memory
0.0MiB live, 0.0MiB allocated; 0ms collecting garbage

Profiling

Loading profile data...